Question

我发现在100％堆积的条形图中绘制两个分类变量时，无法创建合适的标签。考虑下面的代码（重现我的问题的虚构数据集）：

data <- data.frame(
  gender=sample(c("M", "F"), 40, replace=TRUE),
  football=sample(c("Yes", "No"), 40, replace=TRUE)
)

我要做的是创建一个100％堆积的条形图并显示每个类别的标签。我成功地使用以下代码创建了绘图（两种方式都生成相同的绘图）：

ggplot(data, aes(gender))+
  geom_bar(aes(fill=football), position="fill")+
  scale_y_continuous(labels=percent)

ggplot(data, aes(gender, ..count..))+
  geom_bar(aes(fill=football), position="fill", stat="count")+
  scale_y_continuous(labels=percent)

Click here to see the graph

我知道要创建百分比标签，我首先需要计算累积总和。但是，我没有找到正确使用＆＃34; cumsum（var）＆＃34;的方法。带有分类变量。我最接近的是以下内容：

ggplot(data, aes(gender))+
  geom_bar(aes(fill=football), position="fill")+
  geom_text(aes(label=(..count../sum(..count..))*100, fill=football), stat="count")+
  scale_y_continuous(labels=percent)

但如果你重现上面的代码，你会看到百分比是指观察总数（而不是＃34;性别＆＃34;中的类别）以及Y轴变得混乱。任何帮助将得到真正的赞赏。谢谢！

（ggplot）带有两个分类变量的堆积条形图中的Pecentage标签

0 个答案: