ヒートマップ比べ(データ:プリキュア視聴率、ツール:R)
ヒートマップ比べシリーズです。今回はR。
Rでヒートマップを書くことなんてごく簡単なんだけど、適当に書くといい感じに整形しちゃうので、このシリーズでExcel, Tableau, Googleスプレッドシートで書いたヒートマップに見た目をあわせるのにとっても苦労しました。
とくに、プリキュアのシリーズの順番に並べるという点。勝手に入れ替えちゃうんですよね。
色々調査して、下のようなコードで書きました。
> filename <- 'プリキュア視聴率.txt' > df <- read.delim(filename) > > head(df) 話数 番組名 視聴率 1 1 ナージャ 6.1 2 2 ナージャ 6.3 3 3 ナージャ 6.3 4 4 ナージャ 6.6 5 5 ナージャ 7.4 6 6 ナージャ 6.9 > > library(ggplot2) > ggplot(df, aes(x=番組名,y=話数)) + + geom_tile(aes(fill=視聴率)) + + scale_fill_gradient(low="green", high="red") + + xlim(as.character(unique(df$番組名)))
順番を制御しているのは、xlimのところ。実はy軸も他のヒートマップと上下逆だけど、それはもう気にしないことにしました。