如何使用Plotly摆脱默认工具提示?

时间:2016-09-29 18:55:48

标签: r ggplot2 shiny plotly

我正在使用ggplot一段时间,直到我遇到Plotly库并开始将它用于我的情节。我仍然使用ggplot函数来创建绘图,最后使用ggplotly函数来转换它。

我在我的情节中使用geom_tile和geom_text图层来创建热图。我设置了"文本"我希望在工具提示中显示的文本geom_tile中的属性,并在ggplotly函数中传递 tooltip =" text" 。我想在矩形内显示的文本是使用"标签"在geom_text图层中设置的文本。属性。

当渲染绘图时,我可以分别看到两个工具提示,一个是我在geom_tile中的text属性中设置的文本,另一个是重复geom_text层中label属性中的文本。

如何摆脱最后一个工具提示?

提前致谢!

这是我的代码:

<div>

1 个答案:

答案 0 :(得分:1)

ggplotly()会自动创建悬停文字 - 它是魔法&#34;魔法&#34;的一部分。要覆盖,您必须使用plotly_build()

library(plotly)
library(ggplot2)

gg <- ggplot(mtcars, aes(x = cyl, y = gear)) +
  geom_tile(aes(fill = mpg))

pb <- plotly_build(gg)

# check structure of pb with str(pb) and see that the text element is a matrix
mtext <- as.character(seq(1,9,1)))

pb$data[[1]]$text <- matrix(mtext, 3, 3)

pb