r-geom_raster_enteractive中的工具提示未返回正确值

Question

我正在尝试在ggigraph中使用geom_raster_enteractive创建一个地图，在那里我可以使用工具提示功能查看每个网格单元的值。但是，当我将工具提示设置为value时，工具提示会为工具提示中的每个网格单元返回相同的值。

我修改了下面gome_raster_interactive示例中的代码来演示这个问题。我希望能够将鼠标悬停在网格单元的位置上，并在工具提示中查看z的值，但这不起作用。谢谢你的建议！

library(ggplot2)
library(ggiraph)
df <- expand.grid(x = 0:5, y = 0:5)
df$z <- runif(nrow(df))
gg <- ggplot(df, aes(x, y, fill = z, tooltip = z)) +
geom_raster_interactive()
x <- girafe(ggobj = gg)
if(interactive()) print(x)

Answer 1

您可以使用geom_tile_interactive()函数来获得所需的结果。

library(ggplot2)
library(ggiraph)
df <- expand.grid(x = 0:5, y = 0:5)
df$z <- runif(nrow(df))
gg <- ggplot(df, aes(x, y, fill = z, tooltip = z)) +
geom_tile_interactive()
x <- girafe(ggobj = gg)
if(interactive()) print(x)