这是我的数据集
我想绘制一个图表,显示葡萄酒类型的可变品质的概率密度函数。
我试试这个:
library(ggplot2)
db <- dbeta(wines$quality, 1, 1)
qplot(wines$quality, db, geom="line")
但是它的情节很平坦。
好吧,我认为我的代码没有任何感觉。我想做一些想法: Example x品质的葡萄酒(干,半干......)我该怎么办?
答案 0 :(得分:5)
这是你想要的吗?
ggplot(wines) + geom_density(aes(quality))
编辑:
我明白你的观点,但可能你只需要重新调整y值(我是否正确?) 所以这不是你想要的吗? 更改了图片
ggplot(wines[-4381,]) + geom_density(aes(x=quality)) +
facet_wrap(~sweetnes)
或具有不同fill
ggplot(wines) + geom_density(aes(x=quality, fill=sweetnes))