R小叶：绘制折线时线丢失

Question

I have a pretty simple spatial object composed of a bunch of lines. I can plot it in different ways with no problems: QGIS, mapshaper.org. Even the standard R plot() function:

But when I plot it with leaflet() , some segments mysteriously disappear, leaving disconnected lines behind:

A reproducible example follows. NOTE: I use a GeoJSON source file for simplicity here. I have also tried saving the lines as an ESRI shapefile, with the same effect: The data is plotted OK with QGIS, or plot() , etc but not with 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)

UPDATE:

Here's the reproducible example running as a shiny app, hosted at shinyapps.io, and showing the weird leaflet behavior: https://havb.shinyapps.io/leaflet_example/

Answer 1

UPDATE: the problem seems to be a bug in an older version of the leaflet package available from CRAN. Installing the latest development version from Github resolves the issue.

I don't have enough rep to comment, but I tried your code and it worked for me:

Perhaps it has something to do with your local configuration? Have you tried reinstalling the leaflet package?