の続きです。
前回、データフレームの構成を作り替えました。
これで、何をしたかったかというと、
こういうグラフを作りたかったのです。
スクリプトは、
library(RColorBrewer)でカラーパレットのパッケージを読み込みます。
df_new %>% filter(type == "per_total") %>% でper_totalだけのデータフレームにしています。
mutate(pref = reorder(pref, case, FUN = mean)) %>% でprefをcaseの値の平均値の順番に並び替えています。
あとは、ggplot()以下でタイルグラフを作成しています。
今回も、
を参考にしました。
今回は以上です。