如何在ggplot2分面图中同时高亮指定位置与环境温度曲线？

要实现每个分面仅展示单个位置、同时高亮当前位置与环境温度曲线的需求，你可以通过以下步骤调整代码：

核心思路 #

1. 排除环境（surrounding）对应的分面，只保留实际位置的分面
2. 让每个分面高亮当前分面对应的位置曲线和环境温度曲线，其余位置曲线作为淡色背景

实现代码 #

library(ggplot2)
library(gghighlight)

# 示例数据集
set.seed(42)
data <- data.frame(
  day = rep(1:100, 6),
  temp = rnorm(600, mean = 20, sd = 5),
  location = rep(c("Location_1", "Location_2", "Location_3", "Location_4", 
                   "Location_5", "surrounding"), each = 100)
)

ggplot(data, aes(x = day, y = temp, color = location)) +
  # 先绘制所有曲线作为背景，降低透明度区分层级
  geom_line(alpha = 0.3) +
  # 分面时直接排除环境数据的分面
  facet_wrap(~location, ncol = 3, subset = location != "surrounding") +
  # 高亮当前分面对应位置 + 环境温度曲线，关闭自动标签避免干扰
  gghighlight(location == current_facet_var() | location == "surrounding",
              use_direct_label = FALSE) +
  theme_bw()

关键细节说明 #

• facet_wrap的subset参数：直接过滤掉surrounding对应的分面，无需额外处理数据集
• current_facet_var()：gghighlight提供的函数，可获取当前分面的变量值，实现分面与高亮位置的匹配
• 图层顺序：先绘制所有曲线作为背景（低透明度），再通过gghighlight高亮目标曲线，保证视觉层级清晰

为什么之前的代码未生效 #

你尝试的代码存在两个问题：

1. 分面仍包含surrounding，不符合需求
2. 环境曲线图层添加在gghighlight之后，gghighlight的高亮逻辑会覆盖后续图层的显示，导致环境曲线无法正常高亮显示

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