Plotly平行坐标图：如何避免constraintrange随tickvals吸附？

问题概述 #

在使用Plotly R的parcoords绘制平行坐标图时，因需要处理数据中的NA值（通过给NA分配特殊值并修改轴显示实现），必须依赖tickvals自定义轴刻度，但遇到以下问题：

• 设置constraintrange后，约束滑块只能吸附到tickvals的取值，无法实现连续范围的约束控制
• 尝试用自定义空标签隐藏非关键刻度时，轴直接失效
• 示例代码中维度"a"的constraintrange = c(.1, .4)未按预期生效，滑块仍锁定在tickvals的0、0.2、0.4等值上

示例代码 #

library(plotly)
ticktext <- ifelse(
  ((0:100)) %% 10==0, 
  as.character((0:100)/100),
  "emptyLabel"
)
plot_ly(
  type = "parcoords",
  dimensions = list(
    list(
      label = "a",
      values = runif(100),
      range = c(0,1),
      tickvals = (0:5)/5,
      constraintrange = c(.1, .4),
      ticktext = as.character((0:5)/5)
    ),
    list(
      label = "b",
      values = runif(100),
      range = c(0,1),
      tickvals = (0:100)/100
      #ticktext = as.character((0:5)/5)
    ),
    list(
      values = runif(100),
      range = c(0,1),
      tickvals = (0:100)/100,
      ticktext = ticktext,
      label = "c"
    )
  )
)

使用环境 #

R version 4.3.1 (2023-06-16 ucrt)
Platform: x86_64-w64-mingw32/x64 (64-bit)
Running under: Windows 10 x64 (build 19045)

other attached packages:
[1] plotly_4.10.4 ggplot2_3.5.1

解决方案 #

目前Plotly官方尚未针对parcoords的这个行为推出修复方案，但可以通过以下方式规避问题：

1. 用高密度tickvals模拟连续约束 #

将tickvals设置为足够密集的取值（比如间隔0.01），同时通过ticktext只显示需要的刻度标签，非关键刻度用**空字符串""**替代自定义的"emptyLabel"，这样既能保留自定义轴显示，又能让constraintrange的吸附行为几乎不可感知，近似实现连续控制。

2. 兼容NA值处理 #

继续使用特殊值标记NA，在tickvals中添加该特殊值，并在ticktext中对应设置"NA"标签，不影响轴的正常功能。

修改后的代码：

library(plotly)
# 生成0到1间隔0.01的高密度刻度
all_ticks <- seq(0, 1, by = 0.01)
# 仅显示间隔0.1的刻度，其余用空字符串隐藏
ticktext <- ifelse(all_ticks %% 0.1 == 0, as.character(all_ticks), "")

# 若需处理NA，可扩展tickvals和ticktext：
# all_ticks <- c(-1, all_ticks)
# ticktext <- c("NA", ticktext)

plot_ly(
  type = "parcoords",
  dimensions = list(
    list(
      label = "a",
      values = runif(100),
      range = c(0,1), # 若处理NA则改为c(-1,1)
      tickvals = all_ticks,
      ticktext = ticktext,
      constraintrange = c(.1, .4)
    ),
    list(
      label = "b",
      values = runif(100),
      range = c(0,1),
      tickvals = all_ticks,
      ticktext = ticktext
    ),
    list(
      label = "c",
      values = runif(100),
      range = c(0,1),
      tickvals = all_ticks,
      ticktext = ticktext
    )
  )
)

关键说明 #

• 用空字符串""替代自定义的"emptyLabel"，是避免轴失效的核心，Plotly对空标签的处理更友好
• 高密度tickvals不会影响轴的显示性能，因为只有指定的刻度会显示文本
• 处理NA时，只需将NA替换为特殊值（如-1），并同步扩展tickvals、ticktext和range即可

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