用透明颜色填充密度曲线

Question

我有一个数据框，想要根据这两列做一个叠加密度图。我希望颜色是透明的。我使用填充选项完成了此操作，并且基本上将填充分配为因子列。如果默认情况下有一个因子列，则所有填充都将是透明的。

但是在这样的情况下，没有因素我们如何用透明填充它。

library("ggplot2")
vec1 <- data.frame(x=rnorm(2000, 0, 1))
vec2 <- data.frame(x=rnorm(3000, 1, 1.5))

ggplot() + geom_density(aes(x=x), fill="red", data=vec1) + 
  geom_density(aes(x=x), fill="blue", data=vec2)

我尝试添加geom_density(alpha=0.4)，但它没有任何好处。

Answer 1

喜欢这个吗？

ggplot() + geom_density(aes(x=x), fill="red", data=vec1, alpha=.5) + 
  geom_density(aes(x=x), fill="blue", data=vec2, alpha=.5)

编辑对OP评论的回应。

这是使用ggplot绘制多条曲线的惯用方法。

gg <- rbind(vec1,vec2)
gg$group <- factor(rep(1:2,c(2000,3000)))
ggplot(gg, aes(x=x, fill=group)) + 
  geom_density(alpha=.5)+
  scale_fill_manual(values=c("red","blue"))

因此我们首先将两个数据集绑定在一起，然后添加一个分组变量。然后我们告诉ggplot哪个是分组变量，它会处理其他所有事情。