我有一个非常简单的空间对象,由一堆线组成。我可以用不同的方式绘制它,没有任何问题:QGIS,mapshaper.org。甚至是标准的R plot()
函数:
但是当我用leaflet()
绘制它时,一些段神秘地消失,留下断线:
以下是可重现的例子。注意:为简单起见,我在这里使用GeoJSON源文件。我还尝试将这些行保存为ESRI shapefile,效果相同:数据使用QGIS或plot()
等正常绘制,但不与leaflet()
绘制。
library(leaflet)
library(rgdal)
download.file("https://www.dropbox.com/s/nij2oa2rp7ijaaj/commuter_rail.geojson?dl=1",
method = "auto", mode = "wb", destfile = "commuter_rail.json")
commuterLines <- readOGR("commuter_rail.json",
"OGRGeoJSON")
# Straight R Plot - Looks good
plot(commuterLines)
# Plot using leaflet - Some lines are missing!
leaflet() %>% addPolylines(data = commuterLines)
更新:
这是一个可重复的示例,作为一个闪亮的应用程序运行,托管在shinyapps.io,并显示奇怪的传单行为:https://havb.shinyapps.io/leaflet_example/