如何在ggplot2的scale_fill_gradient2中为特定数值指定颜色？

方法一：叠加图层（推荐，灵活易维护） #

直接在基础渐变热图上叠加一层仅包含目标值的geom_tile，将其填充色设为黑色以覆盖原有颜色：

ggplot(df, aes(x, y)) +
  # 绘制基础渐变热图
  geom_tile(aes(fill = z)) +
  # 叠加z=1的黑色单元格
  geom_tile(data = df[df$z == 1, ], fill = "black") +
  scale_fill_gradient2(
    low = '#0017FF',
    mid = "white",
    high = '#FF2D00',
    midpoint = 0,
    na.value = "grey50"
  )

后续替换目标值（比如换成随机数）时，只需修改data = df[df$z == 1, ]中的条件即可，例如改成data = df[df$z == your_random_value, ]。

方法二：自定义颜色映射函数 #

通过scale_fill_manual结合自定义函数，直接在颜色映射逻辑中指定目标值的颜色：

# 自定义颜色映射函数
custom_fill <- function(values) {
  # 生成排除目标值后的渐变颜色序列
  valid_vals <- sort(unique(values[!is.na(values) & values != 1]))
  grad_cols <- colorRampPalette(c('#0017FF', 'white', '#FF2D00'))(length(valid_vals))
  
  # 为每个值分配对应颜色
  cols <- case_when(
    values == 1 ~ "black",
    is.na(values) ~ "grey50",
    TRUE ~ grad_cols[match(values, valid_vals)]
  )
  return(cols)
}

ggplot(df, aes(x, y, fill = z)) +
  geom_tile() +
  scale_fill_manual(values = custom_fill(df$z))

这种方法将目标值的颜色直接嵌入映射规则，但需要注意数据范围变化时，要同步调整渐变颜色序列的生成逻辑。

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