ggplot2离散图例缺失问题：ColorBrewer颜色未显示全部层级

你的问题核心是用错了颜色标尺函数：scale_colour_distiller是为连续数值变量设计的，但你的Year是离散的分类变量，这就导致图例无法正确识别每个年份的层级。即使添加drop=FALSE也没用，因为函数本身的适用场景不对。

具体修复步骤 #

1. 将Year转换为因子类型：年份是分类标签，不是连续的数值，ggplot需要明确这一点才能正确生成离散图例。
2. 替换为离散颜色标尺函数：用scale_colour_brewer（scale_colour_distiller的离散版本）来匹配ColorBrewer的离散调色板。
3. 保留所有层级（可选）：如果需要让数据不全的年份（比如2012、2019）也出现在图例里，添加drop=FALSE参数即可。

修改后的完整代码 #

library(tidyverse)
Year <- c(2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2012, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2013, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2014, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2015, 2016, 2016, 2016, 2016, 2016, 2016, 2016, 2016, 2016, 2016, 2016, 2016, 2017, 2017, 2017, 2017, 2017, 2017, 2017, 2017, 2017, 2017, 2017, 2017, 2018, 2018, 2018, 2018, 2018, 2018, 2018, 2018, 2018, 2018, 2018, 2018, 2019)
Month <- c(4, 5, 6, 7, 8, 9, 10, 11, 12, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 1)
Cum_Total <- c(0,0,0,0,0,0,0,0,0,0,0, 14558, 14568, 14674, 14757, 14807, 14902, 14950, 15024, 15049, 15203, 14775, 14906, 14905, 14991, 15004, 15055, 15112, 15170, 15166, 15273, 15417, 15581, 14939, 15028, 15038, 15127, 15222, 15286, 15395, 15418, 15476, 15528, 15507, 15589, 14919, 15021, 15056, 15115, 15137, 15176, 15176, 15248, 15229, 15277, 15269, 15402, 14839, 14849, 14912, 14929, 14913, 14948, 15015, 15022, 15096, 15046, 15089, 15115, 14737, 14700, 14733, 14694, 14767, 14804, 14730, 14752, 14943, 14918, 14937, 14664, 13081)
Cum_Total[Cum_Total == 0] <- NA

# 将Year转换为因子，保留所有出现过的年份层级
results <- data.frame(Year,Month,Cum_Total) %>%
  mutate(Year = factor(Year, levels = unique(Year)))

ggplot(results,aes(x=Month,y=Cum_Total, group=Year, color=Year)) + 
  geom_line() + 
  geom_point() + 
  # 用离散版的scale_colour_brewer，添加drop=FALSE确保所有年份都显示在图例
  scale_colour_brewer(palette = "Dark2", direction=-1, guide="legend", drop=FALSE) + 
  scale_y_continuous(name="Cumulative Total", limits=c(13000,16000)) + 
  scale_x_continuous(name="Month", limits=c(1, 12), breaks=c(2,4,6,8,10,12))

额外说明 #

• 2012年的数据几乎全是NA，2019年只有1月的记录，drop=FALSE会强制这些年份出现在图例中，即使它们的线条可能不明显。如果不需要显示这些数据不全的年份，可以去掉drop=FALSE。
• ColorBrewer的Dark2调色板本身就是为离散分类设计的，搭配scale_colour_brewer才能完美发挥作用，这和你用连续标尺的初衷完全匹配。

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