可以在一个geom_density图中显示2种不同的颜色？

Question

library(reshape)
library(ggplot2)
df <- data.frame(x = rnorm(1000, 0, 1), y = rnorm(1000,0, 2), z = rnorm(1000, 2, 1.5))
df.m <- melt(df)

ggplot(df.m) +
    geom_density(aes(x=value, y=..density..)) +
    geom_vline(xintercept=1, linetype="dotted")

可以将垂直线的左边用一种颜色而右边另一种颜色吗？