ここに私のデータセットがあります
ワインの種類の部門の可変品質の確率密度関数を示すグラフをプロットしたいと考えています。
私はこれを試します：
library(ggplot2)
db <- dbeta(wines$quality, 1, 1)
qplot(wines$quality, db, geom="line")
しかし、それは平らな線をプロットします。
わかりました、私のコードには意味がないと思います。私はいくつかの嘘をつきたいと思っています: ワインの x 品質の例 (辛口、半辛口....)
私に何ができる？
これは、あなたの望むことですか？
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))
