ggplotを使用して特定のx軸の値に点線の垂直線を追加します

Question

軸の値は-6、-4、-2、0、2,4、6であり、密度プロットにはいくつかのy値があります。 ggplotを使用して、特定のx軸の値（Forex：-3および+3）に点線の縦線を追加することは可能ですか？

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

geom_vline：

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