禁用 plotly 特定图层（geom）的悬停信息

Question

library(ggplot2)
library(plotly)

gg <- ggplot(mtcars, aes(factor(vs), drat)) +
    geom_violin() +
    geom_jitter()
ggplotly(gg)

在示例代码中，我们使用ggplot 绘制小提琴和抖动层。 Plotly 显示两个图层的信息（即，当悬停在抖动点上时，它将显示特定的点信息，当悬停在小提琴图上时会发生同样的事情）。但是，我希望 plotly 仅显示 geom_jitter 的信息。

问题：如何禁用特定图层的悬停信息？

Answer 1

您可以将hoverinfo 设置为"none" 为geom：

gg <- ggplot(mtcars, aes(factor(vs), drat)) +
             geom_violin() +
             geom_jitter()
ggply <- ggplotly(gg)

ggply$x$data[[1]]$hoverinfo <- "none"

ggply