R Plotly热图自定义双颜色刻度失效问题求助

在使用R Plotly绘制上下三角分色的热图时，内置命名颜色刻度（如Viridis、Cividis）可以正常分别作用于两组数据，但自定义颜色刻度时会出现第一个刻度被重复应用的问题，同时色条会合并显示两组数据的范围，导致颜色映射完全混乱。

问题根源 #

Plotly默认会让同类型的多个trace共享颜色映射范围和色条。使用自定义刻度时，如果不明确指定每组数据的数值范围，第二组数据的颜色会被强制适配第一组的范围，同时两个色条会叠加显示，最终导致自定义刻度失效。

修复方案 #

给每个热图trace明确设置zmin/zmax（对应各自数据的极值），并分别配置色条的显示与位置，确保两组数据的颜色映射完全独立。

修复后的完整代码 #

library(tidyverse)
library(plotly)

# 生成样本数据
f <- combn(c("one","two","three","four"),2) %>%
  t() %>%
  as.data.frame() %>%
  rename(x=1,y=2) %>%
  mutate(v1 = rnorm(n(),5), v2 = rnorm(n(), 200, sd=55)) %>%
  arrange(x,y) %>%
  mutate(
    x = factor(x,c("one","two","three","four")),
    y = factor(y,c("four","three","two","one"))
  )

# 自定义颜色刻度
lwr_scale <- list(list(0,"black"),list(1,"red"))
upr_scale <- list(list(0,"white"),list(1,"green"))

# 计算两组数据的极值，用于绑定颜色映射范围
v1_min <- min(f$v1)
v1_max <- max(f$v1)
v2_min <- min(f$v2)
v2_max <- max(f$v2)

f %>%
  plot_ly(
    x = ~x, 
    y = ~y, 
    z = ~v1, 
    colorscale = lwr_scale,
    type = "heatmap",
    zmin = v1_min,  # 绑定v1的数值范围
    zmax = v1_max,
    showscale = TRUE,  # 显示v1的色条
    colorbar = list(title = "v1")
  ) %>% 
  add_trace(
    type="heatmap",
    x = ~y,
    y = ~x,
    colorscale = upr_scale,
    z = ~v2,
    zmin = v2_min,  # 绑定v2的数值范围
    zmax = v2_max,
    showscale = TRUE,  # 显示v2的色条
    colorbar = list(title = "v2", x = 1.1)  # 调整色条位置避免重叠
  )

关键修改点 #

• zmin/zmax：强制每个trace的颜色映射仅对应自身数据的极值范围，避免两组数据的范围互相干扰
• showscale与colorbar：分别显示两个色条，并通过x参数调整位置，让两组数据的颜色刻度清晰区分
• 自定义刻度的0-1区间会自动映射到zmin到zmax的数值范围，确保颜色渐变符合预期

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