使用 ggplot 和 R 绘制预定义的密度函数

Question

我有三个不同长度的数据集，我想在同一个图上绘制所有三个数据集的密度函数。这对于基本图形来说是直接的：

n <- c(rnorm(10000), rnorm(10000))
a <- c(rnorm(10001), rnorm(10001, 0, 2))
p <- c(rnorm(10002), rnorm(10002, 2, .5))

plot(density(n))
lines(density(a))
lines(density(p))

这给了我这样的东西：

alt text http://www.cerebralmastication.com/wp-content/uploads/2009/10/密度.png

但我真的想用 GGPLOT2 来做到这一点，因为我想添加其他功能，这些功能只能通过GGPLOT2。看来 GGPLOT 真的想拿我的经验数据来帮我计算密度。这让我大吃一惊，因为我的数据集长度不同。那么如何在 GGPLOT2 中绘制这三种密度呢？

Answer 1

ggplot2 幸福的秘诀是将所有内容都放在“长”（或者我猜矩阵导向的人们会称之为“稀疏”）格式中：

df <- rbind(data.frame(x="n",value=n),
            data.frame(x="a",value=a),
            data.frame(x="p",value=p))
qplot(value, colour=x, data=df, geom="density")

如果你不想要颜色：

qplot(value, group=x, data=df, geom="density")