如何让ggplot2的scale_fill_identity显示完整预设颜色图例

最简实现思路是：预先定义好7个区间与对应颜色的映射关系，将区间（或颜色）转换为包含全部7个水平的因子，再通过填充刻度设置强制显示完整图例，两种具体方案如下：

方案1：基于scale_fill_identity保留原有pct_cut列 #

1. 先确保pct_cut列是包含全部7种颜色的因子（即使部分颜色在数据中无对应记录）：

   # 替换成你实际的7种颜色值
   all_colors <- c("#FF0000", "#FF9900", "#FFFF00", "#00FF00", "#00FFFF", "#0000FF", "#9900FF")
   df$pct_cut <- factor(df$pct_cut, levels = all_colors)
   

2. 绘图时在scale_fill_identity中指定图例的断点和标签，强制显示全部7项：

   ggplot(df, aes(x = x_col, y = y_col, fill = pct_cut)) +
     geom_tile() +
     scale_fill_identity(
       guide = guide_legend(
         title = "Percentile区间",
         breaks = all_colors,
         # 替换成你7个区间的实际描述，比如"0-10%"、"10-20%"等
         labels = c("0-10%", "10-20%", "20-30%", "30-40%", "40-50%", "50-60%", "60-100%")
       )
     )
   

方案2：改用scale_fill_manual（更直观推荐） #

直接基于区间列（而非颜色列）映射填充色，预先定义区间与颜色的对应关系，自动显示全部图例：

1. 数据处理时生成区间列（替代直接生成颜色列）：

   df <- df %>%
     mutate(
       pct_bin = cut(
         percentile,
         breaks = c(0,10,20,30,40,50,60,100),
         labels = c("0-10%", "10-20%", "20-30%", "30-40%", "40-50%", "50-60%", "60-100%")
       )
     )
   # 定义区间到颜色的映射
   bin_color_map <- c(
     "0-10%" = "#FF0000",
     "10-20%" = "#FF9900",
     "20-30%" = "#FFFF00",
     "30-40%" = "#00FF00",
     "40-50%" = "#00FFFF",
     "50-60%" = "#0000FF",
     "60-100%" = "#9900FF"
   )
   

2. 绘图时用scale_fill_manual指定映射关系，自动显示全部7个区间的图例：

   ggplot(df, aes(x = x_col, y = y_col, fill = pct_bin)) +
     geom_tile() +
     scale_fill_manual(values = bin_color_map, title = "Percentile区间")
   

两种方案都能强制显示全部7种颜色的图例，方案2逻辑更清晰，后续调整区间或颜色更方便，是更推荐的最简实现方式。

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