bindirme yoğunluğu yoğunluğu arsa

Question

Özgün dağılım grafiğine döndürülen yoğunluk grafiğini çakıştırmaya çalışıyorum.

require(ggplot2); set.seed(1); 

df1 <- data.frame(ID=paste0('ID',1:1000), value=rnorm(1000,500,100)) 

p1 <- ggplot(data = df1, aes(x=reorder(ID, value), y=value)) + 
    geom_point(size=2, alpha = 0.7)+ 
    coord_trans(y="log10") 

p2 <- ggplot(data = df1, aes(x=value)) + 
    coord_trans(x="log10") + 
    geom_density() + 
    coord_flip() 

p1 
p2 

İlk dikey eksen log10-dönüştürülmüş değildir yoğunluk arsa ile küçük bir sorun var: İşte ben 2 planları yer alıyor. Ama asıl mesele, doğru koordinatları koruyan önceki grafikte nasıl çizileceğini bulamadığım.

Answer 1

İkinci çiziminizde coord_flip kullandığınız için, aynı x eksenine (yoğunluk ve ID) iki farklı değer çizmeye çalışıyorsunuz. Bunu cesaretlendiren pek çok mesaj var, örneğin bir tane: How do I plot points with two different y-axis ranges on the same panel in the same X axis?.