R による可視化ベストプラクティス
Nick Strayer
Instructor
who_disease %>% filter(region == 'SEAR') %>% ggplot(aes(x = countryCode, y = cases, fill = disease)) + geom_col(position = 'fill')
割合:
円グラフ:
ワッフルチャート:
積み上げ棒グラフ: