geom_histogram 関数に基本的な問題があります
データセットの場合:
df <- data.frame(value = factor( rep(c("A","B"), c(100,200) )))
以下を使用してヒストグラムを作成します。
ggplot(df, aes(x=value, fill = factor(value))) + geom_histogram()
出力は、A が 100、B が 200 のヒストグラムです。
代わりに次のように密度をプロットすると:
ggplot(df, aes(x=value, fill = factor(value), ..density..)) + geom_histogram()
出力は、Aの密度が1、Bの密度が1のヒストグラムです。その理由は、密度がAとBで別々に計算されるためだと思います。
以下で作成されたヒストグラム:
ggplot(df, aes(x=value, group = 1, fill = factor(value),..density..)) + geom_histogram()
A が 0.33 で B が 0.66 のヒストグラムですが、塗りつぶしの色は黒で、このバージョンのプロットでは以前のヒストグラムで使用された塗りつぶしの色を取得する方法が見つかりません。
因子 (値) に基づいて塗りつぶしの色を使用してヒストグラムの最新バージョンを生成するにはどうすればよいですか?