Agregue una línea vertical punteada en ciertos valores de eje x usando ggplot

Question

los valores de eje son -6, -4, -2, 0, 2,4, 6 con algunos valores y en un diagrama de densidad. ¿Es posible agregar líneas verticales punteadas en ciertos valores del eje x (Forex: -3 y +3) usando ggplot?

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_freqpoly(aes(x = value, 
    y = ..density.., colour = variable)) 

Answer 1

Trate geom_vline:

ggplot(df.m) + 
    geom_freqpoly(aes(x=value, y=..density.., colour=variable)) + 
    geom_vline(xintercept=c(-3,3), linetype="dotted")