如何在ggplot中保留自定义颜色并移除部分颜色图例？

问题背景 #

你需要在ggplot中实现：用灰色渐变绘制2011-2016年的线条，用viridis的inferno色系高亮2017-2020年的线条，仅保留高亮年份的图例，但调整breaks后无法正确保留灰色渐变的颜色。

错误根源 #

你之前的代码中scale_color_manual的values顺序错误：原数据年份顺序为2011到2020，但你将highlight_colors放在grey_gradient之前，导致颜色与年份不匹配；同时仅设置breaks时，未确保所有年份的颜色映射都被正确定义。

正确实现方案 #

核心逻辑：

• 确保values的顺序与year因子的水平顺序完全对应（先灰色渐变对应2011-2016，再高亮色对应2017-2020）
• 通过breaks参数指定仅显示高亮年份的图例项

完整可运行代码：

library(data.table)
library(ggplot2)
library(viridis)

# 创建模拟数据
df <- data.table(x = rep(1:10,10),year = rep(2011:2020,each = 10))
df[,y := rnorm(.N,year[1] - 2011,.5),year]

unique_years <- unique(df$year)
Ncol <- 4
grey_gradient <- paste0("grey",round(seq(90,55,length.out = length(unique_years)-Ncol)))
highlight_colors <- inferno(Ncol,begin = .2,end = .8)

ggplot(df,aes(x,y,color = as.factor(year),group = year))+
  geom_line()+
  scale_color_manual(
    breaks = 2017:2020,  # 仅在图例中显示这些年份
    values = c(grey_gradient, highlight_colors),  # 颜色顺序严格匹配2011-2020的年份顺序
    labels = c("2017","2018","2019","2020")  # 可选：自定义图例显示的标签
  )+
  theme_minimal()

备选方案（分图层控制） #

如果需要更精细的图例控制，可以分两次绘制图层：灰色线条不显示图例，高亮线条显示图例，同时统一颜色映射：

ggplot() +
  # 绘制2011-2016年的灰色线条，不显示图例
  geom_line(
    data = df[year %in% 2011:2016],
    aes(x,y,color = as.factor(year),group = year),
    show.legend = FALSE
  ) +
  # 绘制2017-2020年的高亮线条，显示图例
  geom_line(
    data = df[year %in% 2017:2020],
    aes(x,y,color = as.factor(year),group = year)
  ) +
  # 统一设置所有年份的颜色映射
  scale_color_manual(
    values = c(
      setNames(grey_gradient, 2011:2016),
      setNames(highlight_colors, 2017:2020)
    )
  ) +
  theme_minimal()

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