如何在ggplot2中重新排列堆叠面积图的堆叠顺序？

核心问题分析 #

你之前分开调用geom_area并直接指定fill颜色的方式，因为没有将fill映射到数据变量，所以无法生成图例。要实现同色系分组堆叠+保留图例，关键是将fill映射到分组变量，同时控制堆叠顺序让同组国家聚在一起。

解决方案步骤 #

1. 添加分组变量：先给数据新增一个burden变量，标记每个国家属于"高负担"还是"低负担"
2. 映射fill到分组变量：在aes()中指定fill = burden，让ggplot自动生成图例
3. 控制堆叠顺序：通过调整group参数或预先排序数据，确保同组国家堆叠在一起

完整代码示例 #

# 加载必要包
library(ggplot2)
library(dplyr)

# 1. 给数据添加负担分组变量
modeldf1 <- modeldf1 %>%
  mutate(burden = case_when(
    country %in% high_burden_countries ~ "高负担国家",
    TRUE ~ "低负担国家"
  ))

# 2. 可选：预先排序数据，确保同组国家堆叠在一起
modeldf1 <- modeldf1 %>%
  arrange(burden, country)

# 3. 绘制堆叠面积图
ggplot(modeldf1, aes(x = year, y = deaths, group = country, fill = burden)) +
  geom_area(position = "stack") +
  # 自定义颜色对应分组
  scale_fill_manual(values = c(
    "高负担国家" = "dark red",
    "低负担国家" = "light grey"
  )) +
  # 可选：修改图例标题
  labs(fill = "国家负担类型")

代码说明 #

• mutate()创建的burden变量是连接颜色映射和图例的关键，ggplot会根据这个变量生成图例项
• arrange()预先排序数据，让同burden的国家连续排列，ggplot默认会按数据顺序堆叠，从而实现同色系国家聚在一起的效果
• 如果不想预先排序，也可以将group参数改为interaction(burden, country)，强制ggplot先按burden分组再按country堆叠

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