Как построить график функции плотности вероятности с помощью ggplot

Question

Вот мой данные установить

link to dataset

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

Я стараюсь это:

library(ggplot2) 
db <- dbeta(wines$quality, 1, 1) 
qplot(wines$quality, db, geom="line") 

но сюжет плоской линии.

ОК, я думаю, что мой код не имеет никакого чувства. Я хочу сделать somethink врал: Example х-качество вина (сухие, полусухие ....)

Что я могу сделать?

Answer 1

Это то, что вы хотите?

ggplot(wines) + geom_density(aes(quality)) 

EDIT:

Я вижу вашу точку зрения, но, вероятно, вам просто нужно переранжировать значения у (я правильно?) так это не то, что вы после этого? изменил имидж

ggplot(wines[-4381,]) + geom_density(aes(x=quality)) + 
    facet_wrap(~sweetnes) 

или все в одном с различными fill

ggplot(wines) + geom_density(aes(x=quality, fill=sweetnes))