如何用ggplot2为分组线条间的区域填充颜色？

以下是两种实用的实现方法，可直接适配你的数据：

方法1：用geom_ribbon精准填充两线之间区域 #

先将长格式数据转换为宽格式，明确两条线的上下边界，再实现填充：

library(tidyverse)

# 转换为宽格式，拆分男女数值为单独列
df_wide <- df |> 
  pivot_wider(names_from = gender, values_from = value)

# 绘图：先填充区域，再叠加折线保证可读性
df_wide |> 
  ggplot(aes(year)) +
  # 填充男女数值之间的区域，alpha控制透明度
  geom_ribbon(aes(ymin = female, ymax = male), fill = "#6699cc", alpha = 0.3) +
  # 绘制两条折线并自定义颜色
  geom_line(aes(y = male), color = "#336699", linewidth = 1) +
  geom_line(aes(y = female), color = "#993366", linewidth = 1)

方法2：用geom_area实现叠加式填充 #

适合需要同时展示单条线与基线填充的场景，通过叠加实现中间区域高亮：

df |> 
  ggplot(aes(year, value, fill = gender, color = gender)) +
  # 绘制填充区域，关闭堆叠模式让两区域重叠
  geom_area(alpha = 0.3, position = "identity") +
  # 叠加折线
  geom_line(linewidth = 1) +
  # 自定义填充色与线条色
  scale_fill_manual(values = c("#993366", "#336699")) +
  scale_color_manual(values = c("#993366", "#336699"))

关键提示 #

• 若两条折线存在交叉，geom_ribbon会自动识别并填充交叉后的区域；
• 调整alpha参数可避免填充色遮挡折线，平衡美观度与可读性；
• 可按需替换fill和color的颜色值，匹配可视化风格。

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