在R中绘制分组条形图却生成堆叠图的问题排查

问题原因 #

你的代码出现两个问题的核心原因：

1. species是整数类型，ggplot默认将其视为连续变量，因此fill映射后显示渐变色图例，且连续变量的分组逻辑会让position = "dodge"失效，自动变成堆叠图；
2. 原数据集是grouped_df分组数据框，分组规则会干扰ggplot的绘图分组逻辑；
3. year作为整数类型会被当作连续轴，不符合分组展示的需求。

解决方案 #

1. 清理数据集

先取消分组，将species和year转为离散因子类型：

df_clean <- df2 %>%
  ungroup() %>%
  mutate(
    # 将物种转为因子，可自定义标签提升可读性
    species = factor(species, labels = c("物种1", "物种2", "物种3")),
    # 将年份转为因子，作为离散x轴
    year = factor(year)
  )

2. 绘制正确的分组条形图

调整参数确保分组生效：

barplot <- df_clean %>%
  ggplot(aes(x = year, y = n, fill = species)) +
  # 明确设置分组间距，width控制单条宽度
  geom_col(position = position_dodge(width = 0.8), width = 0.7, 
           alpha = 0.5, color = "black", linewidth = 0.1) +
  # 添加可读性标签
  labs(
    x = "年份",
    y = "数量",
    fill = "物种",
    title = "各年份物种数量对比"
  ) +
  # 可选：使用简洁主题提升美观度
  theme_minimal()

print(barplot)

关键修改说明 #

• ungroup()：清除原数据集的分组状态，避免分组规则干扰ggplot的绘图分组；
• factor(species)：将连续整数转为离散分类变量，让fill生成离散图例，同时position_dodge能正常实现并列分组；
• position_dodge(width = 0.8)：手动指定分组条形的间距，配合width参数让布局更合理；
• factor(year)：将年份转为离散分类，x轴会按实际年份依次展示，而非连续数值轴。

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