r语言中，画出了频率分布直方图，怎么在图上添加概率分布曲线

x <- rnorm(10000,0,1)

hist(x, col="grey", prob=TRUE)

lines(density(x), col="red")

先设置好图层：par(mfrow=c(1,1),mai=c(0.5,0.6,0.5,0.5),cex=0.6,cex.main=1.0)#mfrow是规定图片的排列方式，比如你想将两个图并排就写c(1,2)，意为一行两列，后面的参数都可以调整图像显示的位置、大小等。

然后画直方图：hist(Fresh,prob=TRUE,xlab = "Fresh",ylab = "Probability")#prob是指它的数轴是发生概率，只有这个选项为TRUE它跟概率密度曲线的纵轴才一致，不然概率密度曲线纵坐标太小就会画成一道直线。

最后画概率密度曲线：lines(density(Fresh),col="red")

同时运行上面三条语句，即可得如下图画在一张图上的直方图和其密度曲线：

---