R语言如何设置带断点的自定义颜色渐变填充色阶

需求 #

构建自定义分段渐变的填充色阶，数值和颜色的对应规则如下：

• 1~50区间：从darkblue到blue平滑渐变
• 50~100区间：从lightblue到yellow平滑渐变
• 可按相同逻辑扩展更多数值区间的颜色配置

无效方案说明 #

• 叠加多个配置不同limits的scale_fill_gradientn：ggplot2仅会识别最后一个填充色阶配置，前面的配置会被直接覆盖，无法实现分段效果
• 未做锚点对齐直接调用scales::rescale配置values参数：会出现颜色起始点偏移，和预设的分段颜色规则不匹配

正确实现代码 #

library(ggplot2)
library(scales)

# 自定义配置：按需求修改分段节点和对应颜色即可
# 分段数值节点，可扩展添加更多节点
break_vals <- c(1, 50, 100)
# 颜色向量：每个分段的首尾颜色，*数量比分段节点多1*
color_vec <- c("darkblue", "blue", "lightblue", "yellow")

# 计算归一化锚点，将实际数值映射到0-1的色阶范围
norm_anchor <- rescale(break_vals, to = c(0, 1), from = range(break_vals))

# 疫情死亡数据地图调用示例
ggplot(your_map_data, aes(fill = death_count)) +
  geom_sf(color = "white", linewidth = 0.1) +
  scale_fill_gradientn(
    colours = color_vec,
    values = norm_anchor,
    limits = range(break_vals),
    na.value = "grey80",
    name = "死亡人数"
  )

方案说明 #

• 本方案通过手动指定分段数值锚点，以及锚点对应的颜色节点，实现严格符合需求的分段渐变效果，不会出现颜色偏移
• 如需新增分段，仅需要在break_vals中添加新的数值节点，同时在color_vec中对应添加该节点前后的过渡色即可
• 适配所有ggplot2的填充映射场景，包括空间地图、热图、填充柱状图等

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