r - 禁用 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