探索兩個類別變數

在 R 中分析問卷資料

Kelly McConville

Assistant Professor of Statistics

NHANES：種族與糖尿病

svytable(~Diabetes, design = NHANES_design)

Diabetes
       No       Yes 
275814034  24335536

tab_w <- svytable(~Race1 + Diabetes, design = NHANES_design) 
tab_w

          Diabetes
Race1             No       Yes
  Black     32697528   4003497
  Hispanic  17258245   1370393
  Mexican   27886500   2081657
  White    177088354  14708094
  Other     20883407   2171895

tab_w <- as.data.frame(tab_w)
tab_w

      Race1 Diabetes      Freq
1     Black       No  32697528
2  Hispanic       No  17258245
3   Mexican       No  27886500
4     White       No 177088354
5     Other       No  20883407
6     Black      Yes   4003497
7  Hispanic      Yes   1370393
8   Mexican      Yes   2081657
9     White      Yes  14708094
10    Other      Yes   2171895

ggplot(data = tab_w, mapping = aes(x = Race1, fill = Diabetes, y = Freq)) +
  geom_col() + 
  coord_flip()

NHANES：種族與糖尿病

依種族分的糖尿病計數長條圖

NHANES：種族與糖尿病

ggplot(data = tab_w, mapping = aes(x = Race1, 
                                   y = Freq,
                                fill = Diabetes)) + 
  geom_col(position = "fill") + 
  coord_flip()

依種族分的糖尿病分佈長條圖

一起來練習吧！

在 R 中分析問卷資料