- #変数abcにggplotをdataデータを基にして適用
- abc <- ggplot()+
- #geom_violinでバイオリン型グラフの指定、横軸はdistrictをhouseholdsの値を参照し昇順に並び替えたもの、縦軸はH27のデータを用いる。
- geom_violin(data = data,mapping = aes(x =reorder(district,-households),y=households))
- #violin0.pngとして出力
- ggsave(file="violin0.png",plot = abc,width = 5,height = 5))