我正在使用ggplot一段时间,直到我遇到Plotly库并开始将它用于我的情节。我仍然使用ggplot函数来创建绘图,最后使用ggplotly函数来转换它。
我在我的情节中使用geom_tile和geom_text图层来创建热图。我设置了"文本"我希望在工具提示中显示的文本geom_tile中的属性,并在ggplotly函数中传递 tooltip =" text" 。我想在矩形内显示的文本是使用"标签"在geom_text图层中设置的文本。属性。
当渲染绘图时,我可以分别看到两个工具提示,一个是我在geom_tile中的text属性中设置的文本,另一个是重复geom_text层中label属性中的文本。
如何摆脱最后一个工具提示?
提前致谢!
这是我的代码:
<div>
答案 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