我有一个用geom_sf制作的Choropleth贴图,并且正在使用plotly绘制它。
工具提示似乎工作不正确。我将鼠标悬停在某个区域的某些位上,将获得工具提示,但是如果将鼠标悬停在其他位上,则不会。我认为它们显示在边界上,而不是在区域本身上(尽管此地图的其他版本不太清楚,并且似乎会扩散到其他区域,例如。)
无论您将鼠标悬停在区域的哪个部分,是否有人知道有什么方法可以显示工具提示,并确保仅将其限制在其区域内?
这是我正在做的事的一个例子:
library(plotly)
library(sf)
library(maps)
library(mapdata)
us <- st_as_sf(map("state", plot = FALSE, fill = TRUE))
us$random_number <- sample(100, size = nrow(us), replace = TRUE)
us_plot <- ggplotly(ggplot(us, aes(text = paste(ID))) +
geom_sf(aes(fill = random_number)) +
ggtitle("Random numbers") +
scale_fill_continuous("Random"))
us_plot
编辑:
我现在添加了以下代码,这似乎可以改善大多数州的状况,无论您身在何处,它都将显示悬停文本...但是有很多数字却什么都没有显示... < / p>
us_plot %>%
ggplotly(tooltip = paste(ID)) %>%
style(hoverlabel = list(bgcolor = "white"), hoveron = "fill")