微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

传单标签是否支持“\n”换行符?

如何解决传单标签是否支持“\n”换行符?

尝试提高我的制图/数据可视化技能,并快速绘制出我最喜欢的乐队和流派的来源地的气泡图。因此,我的 data.frame 中有一个名为 bandnames 的列,我使用\n 将每个带区以换行符分隔。我为此使用了 dplyr

dplyr::summarise(BandName = paste(BandName,collapse = "\n"))

当我在 RStudio 视图功能中预览工具提示时,这非常有效。这就是我的意思:

enter image description here

但是在 leaflet 中,没有换行符:

enter image description here

有没有什么办法可以解决这个问题,而不必让每个单独的乐队成为自己的行(这会使我想要做的事情变得复杂,因为我想要每个位置有多个乐队名称而没有多个气泡)?

解决方法

你必须记住传单渲染 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)

enter image description here

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。