R传单:从shapefile添加多边形会删除瓷砖

R leaflet: adding polygons from shapefile removes tiles

我有纽约 (https://nycopendata.socrata.com/City-Government/Neighborhood-Tabulation-Areas/cpf4-rkhq) 街区的 shapefile。

当我使用 leaflet 覆盖这些多边形时,背景图块没有显示。

这是我使用的代码:

library(rgdal)
library(leaflet)
nyc = readOGR("geo_export_da30afd0-e475-44e2-90d2-aca31344ef5e.shp",
               layer="geo_export_da30afd0-e475-44e2-90d2-aca31344ef5e")
m = leaflet() %>% fitBounds(lng1 = -74.458921, lat1 = 40.550302, 
                            lng2 = -73.683035, lat2=40.89225)
m %>% addTiles()
m %>% addPolygons(data=nyc)

这是输出:

m %>% addTiles() %>% addPolygons(data = nyc) 

应该可以。 %>% 不赋值,只是传输内容,因此需要是一个完整的链。