R 在ggplot2中合并密度图

R 在ggplot2中合并密度图,r,ggplot2,kernel-density,density-plot,R,Ggplot2,Kernel Density,Density Plot,我试图改进包含多个密度图的图形。我生成的图形如下所示: library(ggplot2) m <- matrix(data=cbind(rnorm(50, 0, 1), rnorm(50, 0, 1.2), rnorm(50, 0, 1.4), rnorm(50, 0, 1.6)), nrow=50, ncol=4) ms <- stack(as.data.frame(m)) ggplot(ms, aes(x=values, color=ind)) + geom_density()

我试图改进包含多个密度图的图形。我生成的图形如下所示:

library(ggplot2)
m <- matrix(data=cbind(rnorm(50, 0, 1), rnorm(50, 0, 1.2), rnorm(50, 0, 1.4), rnorm(50, 0, 1.6)), nrow=50, ncol=4)
ms <- stack(as.data.frame(m))
ggplot(ms, aes(x=values, color=ind)) + geom_density()
在这种情况下有没有办法使用
stat\u smooth()


谢谢

这个问题将受益于一个新的解决方案。你到底想“指出每个点的密度有多一致”吗?我认为你最好自己在ggplot2之外预先计算密度,然后绘制这些+平滑层。“平滑”和“密度”是两个不同的统计函数,因此不能使用其中一个作为另一个的输入,afaikI将尝试这样做。谢谢你的建议。
Error: stat_smooth requires the following missing aesthetics: y