R小册子Rstudio使用addProviderTiles Leaflet显示空白地图

Question

我一直在尝试使用addProviderTiles函数从统计源添加图层。 数据来自此来源：http://www.cbs.nl/nl-NL/menu/themas/dossiers/nederland-regionaal/publicaties/geografische-data/archief/2015/wijk-en-buurtkaart-2014-art.htm

我的代码如下：

library(leaflet)
library(rgdal)

wijken2 <- readOGR("C://", layer="buurt_2014", verbose=FALSE)
newijken <- subset(wijken2, wijken2$GM_NAAM %in% c("Amsterdam"))
pal <- colorNumeric(palette = "Blues",domain = newijken$AUTO_TOT)

leaflet(newijken) %>% addPolygons(stroke= FALSE, fillOpacity = 0.5, smoothFactor = 0.5, color= ~pal(AUTO_TOT)) %>% addProviderTiles("CartoDB.Positron")

结果是基本的空CartoDB地图。

我使用https://rstudio.github.io/leaflet/shapes.html中的数据尝试了类似的方法。这确实显示了添加的图层。

我有什么需要改变的数据吗？

谢谢！

Answer 1

你的预测错了。在longlat它似乎工作，它看起来在正确的国家:)这是你想要的吗？

所以运行

newijken_latlng <- spTransform(newijken, CRS("+proj=longlat +datum=WGS84"))
leaflet() %>%
  addPolygons(data = newijken_latlng, color= ~pal(AUTO_TOT)) %>%
  addProviderTiles("CartoDB.Positron")