Отдельная stat_density для двух кривых плотности в ggplot2 - PullRequest
0 голосов
/ 08 июня 2018

Я пытаюсь создать ggplot, который показывает гистограмму данных, а также две кривые плотности, в которых одна не имеет значения регулировки, а другая имеет.Я попробовал следующий код:

ggplot(df, aes_string(x=value))+ 
        geom_histogram(aes(y=..density..), colour="grey", fill="grey", alpha=.3)+
        geom_density(colour="red", fill="red", alpha=.3)+
        stat_density(bw="SJ", alpha=0)+
        geom_density(colour="blue", fill="blue", alpha=.3)+
        stat_density(bw="SJ", adjust=5, alpha=0)+
        theme_bw()

Но при этом получается график с перекрытием обеих кривых 100% ...

enter image description here

Используемый текстовый фрейм .txt - на моем диске Google Заранее спасибо!

1 Ответ

0 голосов
/ 08 июня 2018

Не добавляет ли конкретный adjust аргумент geom_density то, что вам нужно?

ggplot(df, aes(x=value))+ 
        geom_histogram(aes(y=..density..), colour="grey", fill="grey", alpha=.3)+
        geom_density(colour="red", fill="red", alpha=.3, adjust = 1)+
        geom_density(colour="blue", fill="blue", alpha=.3, adjust = 2)+
        theme_bw()

enter image description here

...