r - 仅第一个多边形出现在 Leaflet 2.0.1 等值线图中

Question

我的 Shiny 应用程序中的传单分区统计图仅显示最近软件包更新到 Leaflet 2.0.1 后的第一个多边形。

我改编了 Leaflet for R 中的代码网页并且它曾经可以工作。

这是 MRE:

library(sf)
library(leaflet)

From http://leafletjs.com/examples/choropleth/us-states.js

states <- read_sf("~/Downloads/cb_2017_us_state_20m/cb_2017_us_state_20m.shp")

leaflet(states) %>%
  setView(-96, 37.8, 2) %>%
  addPolygons(color = "#444444", weight = 1, smoothFactor = 0.5,
              opacity = 1.0, fillOpacity = 0.5,
              fillColor = ~colorQuantile("YlOrRd", ALAND)(ALAND),
              highlightOptions = 
    highlightOptions(color = "white", 
                     weight = 2, bringToFront = TRUE, dashArray = ""))

仅显示第一个多边形的输出:

我已经检查了数据集和 shapefile，它看起来正确，并且可以使用 plot 函数成功绘制。

Answer 1

这是 leaflet v 2.x.x 的一个已知错误

如果删除 dashArray = "" 命令，它应该可以正常渲染，即

states <- read_sf("~/Downloads/cb_2017_us_state_20m/cb_2017_us_state_20m.shp")

leaflet(states) %>%
  setView(-96, 37.8, 2) %>%
  addPolygons(color = "#444444", weight = 1, smoothFactor = 0.5,
              opacity = 1.0, fillOpacity = 0.5,
              fillColor = ~colorQuantile("YlOrRd", ALAND)(ALAND),
              highlightOptions = 
    highlightOptions(color = "white", 
                     weight = 2, bringToFront = TRUE))