R 更改ggplot2中密度图的颜色

我用ggplot2创建了一对漂亮的概率密度函数，如下所示：

require(ggplot2)
set.seed(2)
data <- rbind( data.frame(type="a", lr=rnorm(100)), data.frame(type="b", lr=rnorm(100,.5,1.2)))
m <- ggplot(data, aes(x=lr)) 
m <- m + geom_density(aes(fill=factor(type)), size=2, alpha=.4) 
m

但是没有运气。我还尝试将填充颜色传递给geom_density（）调用，但没有成功

---

如何更改填充颜色

开始踢自己：

m + scale_fill_manual( values = c("red","blue"))

m + scale_fill_manual( values = c("red","blue"))