我了解如何在 plotly 中自定义散点图的悬停文本，但箱形图不接受文本"属性.警告消息:box"对象没有这些属性:text".我有超过 300 个 x 轴变量，并且在两组(A 或 B)中有编号的样本(1-50)，我想在同一个箱形图中一起绘制，然后我想区分样本数和将光标移动到异常值上时通过悬停文本进行分组.我想要我的自定义数据标签而不是自动四分位数标签.plotly 箱线图有可能吗?

图书馆(情节)图书馆(magrittr)plot_ly(melt.s.data,x = ~变量，y = ~值，类型 = '盒子',text = ~paste("样品编号:", Sample_number,'<br>组:', 组)) %>%layout(title = "每个 x 的个体分布")

这是一些仅显示 5 x 变量的示例数据(但当外推到我的 300 时，代码应该可以工作)...

#样本数据设置种子(456)#A组sample.data_a <- data.frame(Class = "red", Group = "A",Sample_number = seq(1,50,by=1),x1= rnorm(50,mean=0, sd=.5),x2= rnorm(50,mean=0.5, sd=1.5),x3= rnorm(50,mean=5, sd=.1),x4= rnorm(50,mean=0, sd=3.5),x5= rnorm(50,mean=-6, sd=.005))#B组sample.data_b <- data.frame(Class = "red", Group = "B",Sample_number = seq(1,50,by=1),x1= rnorm(50,mean=0, sd=5.5),x2= rnorm(50,mean=0.5, sd=7.5),x3= rnorm(50,mean=5, sd=.01),x4= rnorm(50,mean=0, sd=.5),x5= rnorm(50,mean=-6, sd=2.05))#row 绑定组sample.data <- rbind(sample.data_a, sample.data_b)#melting 数据以具有更可图形化的格式图书馆(重塑2)melt.s.data