我想在ggplot2的一个密度图中个性化颜色。
set.seed(1234)
dat <- data.frame(cond = factor(rep(c("A","B", "C"), each=300)),
rating = c(rnorm(300, mean=1),rnorm(300, mean=-1),rnorm(300, mean=0)))
library(plyr)
cdat <- ddply(dat, "cond", summarise, mean=mean(rating))
library(ggplot2)
ggplot(dat, aes(x=rating, fill=cond)) +
geom_density(alpha=.3) +
geom_vline(data=cdat, aes(xintercept=mean, colour=cond),
linetype="dashed", size=1)
如您在代码中所观察到的,在此函数中通常有用的字段中,我们用来对ggplot进行排序,以按组分配分布。 如何获得个性化的颜色?