我需要在同一个图中使用三个密度（或平滑直方图）。我正在使用ggplot，每个变量有1000个观察值。因此，值可以发生的次数最多为1000次。突然间，我的代码对某些值产生极高的计数。
data <- read.table("mydata.txt", sep=",")
df <- data.frame(data)
df.m <- melt(data, variables=)
ggplot(den.m,aes(x=value, fill=variable)) + geom_density(alpha=0.25)
+ ylab("Counts")
如何将数据附加到此问题？