如何解决传单标签是否支持“\n”换行符?
尝试提高我的制图/数据可视化技能,并快速绘制出我最喜欢的乐队和流派的来源地的气泡图。因此,我的 data.frame
中有一个名为 bandnames
的列,我使用\n
将每个带区以换行符分隔。我为此使用了 dplyr
:
dplyr::summarise(BandName = paste(BandName,collapse = "\n"))
当我在 RStudio 视图功能中预览工具提示时,这非常有效。这就是我的意思:
但是在 leaflet
中,没有换行符:
有没有什么办法可以解决这个问题,而不必让每个单独的乐队成为自己的行(这会使我想要做的事情变得复杂,因为我想要每个位置有多个乐队名称而没有多个气泡)?
解决方法
你必须记住传单渲染 html - 所以尝试像
dplyr::summarise(BandName = paste(BandName,collapse = "<br>"))
并确保将其映射到传单调用中的弹出窗口(而非标签)。
或者考虑这个例子/它建立在 mutate 而不是 summarise 之上,适当的函数将取决于你的数据集的性质。但关键部分是在 HTML 中使用 <br>
而不是在 R 中使用 \n
。
library(sf)
library(leaflet)
shape <- st_read(system.file("shape/nc.shp",package="sf")) %>% # included with sf package
st_transform(4326) %>%
dplyr::mutate(label = paste(CNTY_ID,NAME,sep = "<br>"))
leaflet(shape) %>%
addProviderTiles("Stamen.Toner") %>%
addPolygons(color = "blue",fillColor = "red",popup = ~label)
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。