घनत्व प्लॉट में कुछ y मानों के साथ ggplot

Question

धुरी मान -6, -4, -2, 0, 2,4, 6 का उपयोग कर कुछ एक्स-अक्ष मानों पर एक बिंदीदार लंबवत रेखा जोड़ें। क्या ggplot का उपयोग कर कुछ एक्स-अक्ष मानों (विदेशी मुद्रा: -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")