1

这是我的数据集

链接到数据集

我想绘制一个图表,显示葡萄酒类型划分的可变质量的概率密度函数。

我试试这个:

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

但它绘制平线。

好的,我认为我的代码没有任何意义。我想做一些谎言: 例如 葡萄酒的x质量(干,半干......)

我能做些什么?

4

1 回答 1

7

这是你想要的吗?

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))

在此处输入图像描述

于 2013-06-02T12:35:51.400 回答