ggplot 2 を使用して、ヒストグラムに正規曲線を重ね合わせようとしています。
私の公式:
data <- read.csv (path...)
ggplot(data, aes(V2)) +
geom_histogram(alpha=0.3, fill='white', colour='black', binwidth=.04)
いくつか試してみました:
+ stat_function(fun=dnorm)
....何も変わらなかった
+ stat_density(geom = "line", colour = "red")
...X軸に真っ直ぐな赤い線が表示されました。
+ geom_density()
頻度の値を y 軸上に保持し、密度の値は不要であるため、これは私には機能しません。
助言がありますか？
解決策が見つかりました!
+geom_density(aes(y=0.045*..count..), colour="black", adjust=4)
ベストアンサー1
わかったと思うよ:
library(ggplot2)
set.seed(1)
df <- data.frame(PF = 10*rnorm(1000))
ggplot(df, aes(x = PF)) +
geom_histogram(aes(y =..density..),
breaks = seq(-50, 50, by = 10),
colour = "black",
fill = "white") +
stat_function(fun = dnorm, args = list(mean = mean(df$PF), sd = sd(df$PF)))
