这是因为在将多边形传递给传单之前需要将多边形转换为纬度/经度:
library(sf) inv <- sf::st_read("ERS10.rep.shp") %>% sf::st_transform(4326) leaflet() %>% addProviderTiles("CartoDB.Positron") %>% addPolygons(data = inv)
要么
library(sp) inv <- rgdal::readOGR("ERS10.rep.shp") %>% spTransform(CRS("+proj=longlat +datum=WGS84")) leaflet() %>% addProviderTiles("CartoDB.Positron") %>% addPolygons(data = inv)