1

我想在由空间多边形文件制作的地图上放置基于 lat long 的标记（我已经在数据框中拥有这些数据）。我可以在addTiles函数的帮助下在 openstreetMap 上执行此操作，但被空间多边形文件卡住了。以下是以openstreet地图为背景的代码

    datm <- read.csv("lat_data2.csv", header = TRUE)
#This reads the lat long data file

此文件中的示例数据：

brand      city         lon        lat
Tata Motors ADILABAD    78.5320107  19.6640624
Maruti  Adoni   77.2728368  15.6322227
Honda   Agra    78.5080745  27.1766701
Hyundai Agra    78.0080745  26.6766701

然后我使用

leaflet(data = datm)%>%
  addProviderTiles("Esri.WorldGrayCanvas", options = tileOptions(minZoom=5, maxZoom=7))%>%
  addMiniMap(position = "bottomright")%>%
  addMarkers(datm, lng = ~lon, lat = ~lat,label = ~datm$city,icon = ~caricon)
 #caricon is a list of png icon that i have made

这给了我这个 现在我只想看印度的地图，所以有没有办法让其他国家变成空白。这是输出

为了实现这一点，我正在尝试在印度的 shapefile 上进行相同的绘制标记练习，是否有另一种方法可以做到这一点？

当我使用此代码时

leaflet()%>%
    addPolygons(data = s)%>%
    addMarkers(lng = 73.229354, lat = 25.761765,popup = "single marker")
    # here s is a spatialolygondataframe of country india.

我明白了在此处输入图像描述

但我不明白如何将多个 lat long 作为输入来制作标记。我试过这个

      leaflet()%>%

    addMarkers(lng = datm$lon, lat = datm$lat,popup = datm$city)%>%
  addPolygons(data = s)

但这给了我错误。感谢您提供任何帮助我在此停留了很长一段时间，这令人沮丧。我搜索了任何类似的主题，但找不到任何可以解决我的问题的东西。

4

1 回答 1

2

使用您的示例（此处称为 df ）和名为 的 shapefile india，india <- readOGR('INDIA.shp')您的代码应如下所示：

leaflet(data = df) %>%
  addProviderTiles("Esri.WorldGrayCanvas", options = tileOptions(minZoom=5, maxZoom=7))%>%
  addMiniMap(position = "bottomright")%>%
  addMarkers(df, lng = ~lon, lat = ~lat,label = ~df$city) %>%
  addPolygons(data = india)

如您所见，地图上出现了多个标记。

在此处输入图像描述

您遇到的问题源于未正确编写 addMarkers 的语法，~需要在lat和lng参数中说明。

于 2017-09-01T17:28:28.760 回答