使用ggplot2在直方图上绘制法线曲线：代码在0处产生直线

您的曲线和直方图的y比例不同，并且您没有在上查看帮助页面stat_function，否则您将把参数放在alist中，如示例中清楚显示的那样。您aes在初始ggplot通话中做的也不正确。我真诚地建议阅读更多的教程和书籍（或至少是帮助页面），而不是逐行学习ggplot。

解决stat_functionarg问题和ggplot``aes问题后，您需要解决y轴比例差异。为此，您需要为直方图切换y以使用来自基础stat_bin计算数据帧的密度：

library(ggplot2)

gg <- ggplot(mtcars, aes(x=mpg))
gg <- gg + geom_histogram(binwidth=2, colour="black", 
                          aes(y=..density.., fill=..count..))
gg <- gg + scale_fill_gradient("Count", low="#DCDCDC", high="#7C7C7C")
gg <- gg + stat_function(fun=dnorm,
                         color="red",
                         args=list(mean=mean(mtcars$mpg), 
                                  sd=sd(mtcars$mpg)))

gg