r - 在 R 中的堆积条形图上添加类别标签

Question

我geom_col()在 ggplot2 中制作了一个图表，我想在条形图上添加标签，但每个堆叠条形图只有一个。这是我的图表没有标签的样子：

gI <- df %>% 
  ggplot(aes(fill = Category, y=csum, x= tijdas)) +
  geom_col()
plot(gI)

现在是棘手的部分。每个堆叠条都有一个特定的 Meeting_type，我想将它添加到情节中。我试过添加

geom_text(aes(label = Meeting_Type), position = position_dodge(width=0.9), vjust=-0.25)

但这导致每个栏中的每个类别都有一个标签（所以很多文本）：

我希望每个（堆叠的）条只有一个标签来指示 Meeting_type。最好放在可读的地方。

Answer 1

在没有查看数据的情况下很难知道最佳方法，但替换geom_text为stat_summary可能是对每一列求和以获得标签位置的好方法：

library(ggplot2)
library(dplyr)

mtcars %>% 
  ggplot(aes(factor(cyl), y = mpg, fill = factor(gear))) +
  geom_col() +
  stat_summary(aes(label = factor(cyl), fill = NULL),
               fun = sum, 
               geom = "text", vjust = -0.25)

^{由reprex 包于 2020-12-15 创建(v0.3.0)}

正如我所说，可能需要为您的数据使用不同的功能 - 如果这不是解决方案，那么请使用发布示例dput，我们将看看是否可以使其适用于您的数据。