Распределение одной переменной

Разведочный анализ данных в R

Andrew Bray

Assistant Professor, Reed College

Маргинальное распределение

table(comics$id)

No Dual  Public  Secret Unknown 
   1511    6067    7927       9

tab_cnt <- table(comics$id, comics$align)
tab_cnt

         Bad Good Neutral
No Dual  474  647     390
Public  2172 2930     965
Secret  4493 2475     959
Unknown    7    0       2

ggplot(comics, aes(x = id)) +
  geom_bar()

ch1_3.002.png

tab_cnt <- table(comics$id, comics$align)
tab_cnt

         Bad Good Neutral
No Dual  474  647     390
Public  2172 2930     965
Secret  4493 2475     959
Unknown    7    0       2

ggplot(comics, aes(x = id)) +
  geom_bar() +
  facet_wrap(~align)

ch1_3.008.png

ch1_3.010.png

ch1_3.011.png

ch1_3.012.png

ch1_3.013.png

ch1_3.014.png

ch1_3.016.png

ch1_3.017.png

ch1_3.018.png

Разведочный анализ данных в R