传单标签是否支持“\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)