带有聚合值的小提琴图 (geom_violin)

我想用汇总数据创建小提琴图。我的数据有一个类别、一个值列和一个计数列：

data <- data.frame(category = rep(LETTERS[1:3],3),
                   value = c(1,1,1,2,2,2,3,3,3),
                   count = c(3,2,1,1,2,3,2,1,3))

如果我创建一个简单的小提琴图，它看起来像这样：

plot <- ggplot(data, aes(x = category, y = value)) + geom_violin()
plot

_{(source: ahschulz.de)}

那不是我想要的。解决方案是通过将每个类别值组合的行相乘来重塑数据框。问题是我的计数达到数百万，需要几个小时才能绘制出来！ :-(

我的数据有解决方案吗？

提前致谢！

您可以在计算面积时提交重量。

plot2 <- ggplot(data, aes(x = category, y = value, weight = count)) + geom_violin()
plot2

您将收到警告消息，指出权重未加到 1，但这没关系。看此处进行类似/相关的讨论.