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