ggplot2 - geom_text 如何在条形中间放置标签

问题描述

对于 RStudio/ggplot2 初学者，我需要一些帮助。我用以下代码制作了一个条形图

ggplot(match_player,aes(x = civ,fill = winner,group = winner),show.legend = T) +
  geom_bar() +
  geom_text(aes(label = stat(count)),stat = "count",color = "black",size = 3,position = "dodge")

条形图图像

我想将标签保留在所属栏的中间。

解决方法

大功告成，只需更改文本层中的 position 参数即可。以下标准数据集的示例：

library(ggplot2)

ggplot(mpg,aes(class,fill = as.factor(drv))) +
  geom_bar() +
  geom_text(stat = "count",position = position_stack(vjust = 0.5),aes(label = after_stat(count)))

^{由 reprex package (v0.3.0) 于 2021 年 2 月 2 日创建}