geom_ribbon填充线条间区域出现异常连线问题排查

问题本质 #

geom_ribbon完全适用于你这个场景，但你的代码存在两个核心问题，导致了异常连线：

1. ymax/ymin逻辑错误：当y1 < y2时，你设置的ymax=y1、ymin=y2违反了geom_ribbon要求ymax >= ymin的规则，绘图引擎无法正确解析填充区域。
2. 未按连续符号区间分组：当两条曲线交叉（差值符号变化）时，相邻行的符号不同，geom_ribbon默认将所有行视为同一组，从而在不同符号区域之间错误连接填充，形成异常连线。

修正后的代码 #

第一步：预处理数据 #

修正ymax/ymin逻辑，并为连续的相同符号区间创建分组：

datos.2022 <- datos.2022 %>%
  mutate(
    y1 = SSTm - 273.15,
    y2 = SST.mean.day - 273.15,
    # 计算y1与y2的差值符号
    sign_val = sign(y1 - y2),
    # 动态设置ymax和ymin，确保ymax始终大于等于ymin
    ymax = ifelse(sign_val == 1, y1, y2),
    ymin = ifelse(sign_val == 1, y2, y1),
    # 为连续的相同符号区间创建独立分组
    group_id = cumsum(abs(sign_val - lag(sign_val, default = first(sign_val))) > 0)
  )

第二步：绘图 #

在geom_ribbon中加入group参数，确保每个连续的符号区间单独绘制：

ggplot(datos.2022, aes(x = fecha)) +
  geom_line(aes(y = y1), color = "red") +
  geom_line(aes(y = y2), color = "black") +
  geom_ribbon(
    aes(ymax = ymax, ymin = ymin, fill = as.factor(sign_val), group = group_id),
    alpha = 0.6
  ) +
  scale_fill_manual(guide = "none", values = c("blue", "red")) +
  scale_y_continuous(limits = c(10, 30)) +
  scale_x_date(expand = c(0, 0), breaks = "1 month", date_labels = "%b") +
  theme_hc() +
  labs(x = "", y = "SST", title = "Temperature (2022)") +
  theme(text = element_text(size = 20, family = "Arial"))

关键说明 #

• 动态设置ymax和ymin保证了填充区域的合法性，让geom_ribbon能正确识别需要填充的范围。
• group_id的作用是将符号相同的连续行划分为同一组，避免跨符号区间的错误连接，彻底解决异常连线问题。

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