3

我的目标是使用 csv 文件中的数据在 Leaflet 中绘制线条。

示例数据：

point   lat long    SiteName    group   colour  endlat  endlong id
A   52.169868   4.66844 Kruisweg-Vriezekoop L1  green   52.22576    4.676024 1

现在，我有一个工作示例，通过绘制一条线：

map <- leaflet(data = myDF) %>%
addTiles() %>%  
addPolylines(data = myDF[1,], lat = ~c(lat, endlat), lng = ~c(long, 
endlong), color = "red") %>%
 addPopups(data = myDF, lat = ~lat, lng = ~long, popup = ~SiteName)
map

我的意图是使用以下循环遍历行数：

  map <- leaflet(data = myDF) %>%
  addTiles() %>%

  for (i in nrow(myDF$id)) {
    map <- addPolylines(map, data = myDF[i,], lat = ~c(lat, endlat), lng = 
    ~c(long, endlong), color = "red")  
  }

  addPopups(data = myDF, lat = ~lat, lng = ~long, popup = ~SiteName)

  map

我尝试在 Leaflet 函数中添加此循环，但我不断收到此错误：

继承错误（地图，“传单”）：缺少参数“地图”，没有默认值

之后，我得到一个空结果。

如何在 Leaflet 函数中使用循环？或者有没有更有效的方法？

4

0 回答 0