Построение предопределенных функций плотности с использованием 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/density.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")