如何在R语言的柱状图（barcharts）中添加ID标识

问题描述 #

我有如下R示例数据：

dd<-read.table (text=" ID   Group
1   A
2   C
4   A
9   B
6   A
8   B
12  A
5   C
", header=TRUE)

我希望绘制分组柱状图，并在每个分组的柱子内部标注对应的ID，最终效果为每个分组的柱子内垂直显示该组的所有ID。

可以使用ggplot2配合dplyr包实现需求，具体步骤如下：

1. 加载所需工具包

library(ggplot2)
library(dplyr)

2. 预处理数据：为每个分组内的ID计算y轴位置，保证文字在柱子内垂直排列

dd_processed <- dd %>%
  group_by(Group) %>%
  mutate(y_pos = seq(from = 0.2, to = n()*0.2, by = 0.2)) # 可调整步长控制文字间距

3. 绘制带ID标注的分组柱状图

ggplot(dd_processed, aes(x = Group, y = n())) +
  geom_bar(stat = "identity", fill = "#638bd6") + # 设置柱子颜色
  geom_text(aes(y = y_pos, label = ID), color = "white", size = 4) + # 添加ID文本
  labs(x = "分组", y = "数量") +
  theme_minimal()

你可以根据实际需求调整柱子填充色、文字大小或y轴位置的步长，优化图表显示效果。

内容的提问来源于stack exchange，提问作者user330