r - geom_bar 中的 aes(group = x) 如何计算比例？

Question

我想知道如何使用以下代码计算 y 轴上的比例：

library(ggplot2)
ggplot(data = diamonds) + geom_bar(mapping = aes(x = cut, y = stat(prop), group = color))

这是输出图。

我知道有一篇关于aes(group = 1) here含义的帖子。但这并不能解决我的问题。

谢谢你。

Answer 1

如果我们在每个条形周围画黑线，我们可以更清楚地看到发生了什么：

library(ggplot2)

ggplot(data = diamonds) + 
  geom_bar(mapping = aes(x = cut, y = stat(prop), group = color), 
           color = "black")

我们可以看到这些条是堆叠的。很明显，每一组的总和不等于一，所以比例不是每个切割由不同颜色组成的比例；相反，它们是属于特定切割的每种颜色的比例。如果我们使用position_dodge并根据以下内容进行填充，则更容易看到这一点color：

ggplot(data = diamonds) + 
  geom_bar(mapping = aes(x = cut, y = stat(prop), fill = color, group = color), 
           color = "black", position = "dodge")