ggplot（）行透明度

Question

如何更改ggplot()圖（即直方圖，折線圖等）中行的透明度級別？

例如考慮下面的代碼：

data <- data.frame(a=rnorm(100), b = rnorm(100,.5,1.2)) 
data <- melt(data) 
colnames(data) <- c("Category", "Intensity") 
p <- ggplot(data, aes(x=Intensity)) 
p <- p + geom_density(aes(color=Category), size=2, alpha=.4) 
print(p) 

我預想的線路將是透明的（如alpha=.4），但他們沒有。

Answer 1

只需以下@baptiste's directions，

data <- data.frame(a=rnorm(100), b = rnorm(100,.5,1.2)) 
data <- melt(data) 
colnames(data) <- c("Category", "Intensity") 
p <- ggplot(data, aes(x=Intensity)) 
p + geom_line(aes(color=Category), stat="density", size=2, alpha=0.4)