ggplot geom_density：更改颜色

Question

我的密度图正确显示，但我无法更改颜色方案。这是代码：

dd = data.frame(Securities=queryResults$Securities,
                TR = as.numeric(queryResults$TR))
dd = na.omit(dd)
attach(dd)

fileName = "C:\\Location\\RetT.jpeg"
jpeg(file=fileName)

p <- ggplot(data=dd, aes(x=TR, fill=Securities)) + 
    geom_density(alpha=0.3) + 
    ylab("Probability Density") +
    xlab("1-Year Return") +
    xlim(-1.0, 2.0) +
    theme(legend.position = c(0.9,0.88), plot.title = element_text(face="bold", size = 14), 
          axis.title.x = element_text(face="bold", size = 12),
          axis.title.y = element_text(face="bold", size=12),
          panel.background = element_rect(fill="white",color = "grey50", size=2),
          panel.grid.major = element_line(color = "grey",size=(0.2)))

p + ggtitle("Density of Large and Small-Cap Returns: 2005-2018")
dev.off()

一切正常并产生这个情节：

我的问题是我无法弄清楚如何更改配色方案。我已经尝试了以下所有方法（当然是另外的）：

p + scale_fill_manual(values=c("gray","seagreen3"),name = "Securities")
p + scale_color_manual(values=c("gray","seagreen3"))
p + scale_color_brewer(palette = "Set3")

上面三行代码中的每一行都没有错误地执行，但它们对绘图没有影响 - 颜色保持不变。另外，我尝试在geng_density中添加颜色参数，并在ggplot中添加aes函数：color = c（＆＃34; green＆＃34;，＆＃34; blue＆＃34;）。这导致一个错误，说美学需要与数据的长度相同。

帮助将不胜感激，谢谢！