Отсутствие полигонов при использовании Leaflet в R

Question

Я пытаюсь воспроизвести код для отображения многоугольников на карте на другом компьютере, однако на одном компьютере многоугольники не отображаются. У кого-то была такая проблема при обмене кодом? Вы можете скачать шейп-файл здесь: http://www.conabio.gob.mx/informacion/metadata/gis/muni_2012gw.xml?_xsl=/db/metadata/xsl/fgdc_html.xsl&_indent=no

library(rgdal)
library(rgeos)
library(leaflet)

Mex <- readOGR(dsn="C:/DISCO D", layer="Muni_2012gw")
Mex_sub <- Mex[Mex$CVE_ENT=="01",]



bins <- quantile(Mex_sub@data$OID_1, c(0,.125,.25, .5, .75,.875, 1))
pal <- colorBin("YlOrRd", domain = Mex_sub@data$OID_1, bins = (bins),
                na.color = "grey40", reverse = FALSE)

centr <- gCentroid(Mex_sub)@coords
leaflet(Mex_sub, options = leafletOptions(minZoom = 4, maxZoom = 15)) %>% 
  addTiles() %>%
  setView(centr[1], centr[2], zoom = 8) %>%
  addPolygons(data=Mex_sub, weight = 1,fill = ~OID_1, fillColor = ~pal(OID_1),
              opacity=1, fillOpacity = 0.5, color=grey(0.5))