R leaflet map：在标签弹出窗口中包含多行数据

Question

我的数据行具有重复的纬度/经度，并且我想包含一个包含所有分组列数据的标签。

# Make sample dataframe
long <- c(147.5, 147.5, 147.5, 147, 147)
lat <- c(-36.5, -36.5, -36.5, -36, -36)
label <- c(1, 1, 2, 1, 2)

markers <- data.frame(lat,long,label)

# Combine labels based on lat long
markers <- markers %>%
  group_by(lat, long) %>%
  summarize(concat_label = toString(label)) 

# Markers with all of the labels
leaflet() %>%
  addTiles() %>%  
  addMarkers(lng=markers$long, lat= markers$lat, 
             popup= markers$concat_label
  )

toString 是否有一个版本使用换行符而不是逗号？我尝试使用paste和paste0但无法让它工作。

Answer 1

# Make sample dataframe
long <- c(147.5, 147.5, 147.5, 147, 147)
lat <- c(-36.5, -36.5, -36.5, -36, -36)
label <- c(1, 1, 2, 1, 2)

markers <- data.frame(lat,long,label)

# Aggregate method
markers <- aggregate(label ~ lat + long, markers, paste, collapse = "<br/>")

# Markers with all of the labels
leaflet() %>%
  addTiles() %>%  
  addMarkers(lng=markers$long, lat= markers$lat, 
             popup= markers$label
  )

这个问题有答案： 将列折叠/连接/聚合为每个组中的单个逗号分隔字符串