我无法在 R leafjet 的地图上放置标记

Question

这是我的代码：

m <- leaflet() %>%
  addProviderTiles(providers$Stamen.Toner) %>%
  setView(lng = -107.9917071, lat = 59.5, zoom = 3.5) %>%
  addPolygons(data = plant,
              color = "#660000",
              weight = 1,
              smoothFactor = 0.5) %>%
  addCircleMarkers(lng = plant$lon, lat = plant$lat)
m

无论我尝试什么，我都会收到以下错误消息：

Error in polygonData.default(data) : Don't know how to get path data from object of class spec_tbl_df

我的数据来自我的数据框是一个简单的 5 行 3 列坐标和地点名称。

想法？

Answer 1

您有点数据，而不是多边形。

library(leaflet)

plant <- data.frame(
  stringsAsFactors = FALSE,
              Name = c("University","University",
                       "University","University","University"),
               lat = c(43.5339923, 49.8091536, 3.52682, 49.2519564, 45.5069177),
               lon = c(-80.2244647,-97.1330418,
                       -113.5244937,-123.2465285,-73.5791163)
)


leaflet() %>%
  addProviderTiles(providers$Stamen.Toner) %>%
  setView(lng = -107.9917071, lat = 59.5, zoom = 3.5) %>%
  # I removed the addPolygons(), you are adding points, not polygons
  addCircleMarkers(lng = plant$lon, lat = plant$lat)

我无法在 R leafjet 的地图上放置标记

I am having trouble puting markers on a Map in R leafjet

r

r-leaflet