在ggplotly中，如何用代码取消选择图例条目？

Question

我正在制作一个 ggplotly 图，它定义具有不同填充颜色的组（A 组或 B 组）。

library(ggplot2)
library(plotly)

data <- data.frame(x = c(1,2,3, 10, 11, 12),
                   y = c(1,2,3, 10, 11, 12), 
                   group = c(rep("A",3), rep("B",3)))
p <- ggplot(data, aes(x = x, y = y, fill = group))+
  geom_point()

ggplotly(p)

我希望默认情况下不显示其中一个级别，就像我单击图例来隐藏该级别一样。

如何以编程方式设置图例，以便默认情况下取消选择 B 组。

Answer 1

受此问题的启发，您可以使用属性修改每个跟踪visible = 'legendonly。正如r2evansplot_ly所指出的，在和 之间进行转换并不总是那么简单ggplotly。 这篇文章展示了如何修复 ggplotly 对象（如果您已经拥有该对象），并且它对我有用。

gg <- ggplotly(p)
gg <- plotly_build(gg) 
gg$x$data[[2]]$visible <- 'legendonly'  

gg