我正在製作美國社區調查數據地圖。目前我有一個主層(見下面plotMerge$incomePerCapita
)。它運作良好,有一個完全充實的彈出窗口,圖像和所有。當我添加第二層時,爲了提供縣和區域邊界,短程邊界變得不可點擊,看起來被新層掩蓋。Leaflet Map - 第二個Polygon使第一層不可點擊
如果我交換圖層順序,區域邊界變得不可見。
map1<-leaflet()%>%
addTiles()%>%
addPolygons(data = plotMerge,
fillColor = ~pal(plotMerge$incomePerCapita),
color = "#000000", #this is an outline color
fillOpacity = 0.8,
weight = 0.2,
popup=popup)%>%
addPolygons(data = countyPoly,
fillColor = "transparent",
color = "#000000",
stroke = TRUE,
weight = 1,
smoothFactor = 0.5,
group = "Counties")%>%
addLegend(pal = pal,
values = plotMerge$incomePerCapita,
position = "bottomright",
title = "State-wide Income Percentiles",
labFormat = labelFormat(digits=1))
saveas(map1, "map1.html")
map1
有沒有一種方法可以在第二層顯示邊界輪廓,但仍保留前一層完整的功能?
我應該以不同的方式腳本化addPolygons以顯示邊界而不強加功能晦澀的圖層嗎?
UPDATE:
我固定的錯誤,並交換了addPolygons
代碼來獲取層的正確順序。
map1<-leaflet()%>%
addTiles()%>%
addPolygons(data = countyPoly,
fillColor = "transparent",
color = "#000000",
stroke = TRUE,
weight = 1,
smoothFactor = 0.5,
group = "Counties")%>%
addPolygons(data = plotMerge,
fillColor = ~pal(plotMerge$incomePerCapita),
color = "#000000", #this is an outline color
fillOpacity = 0.8,
weight = 0.2,
popup=popup)%>%
addLegend(pal = pal,
values = plotMerge$incomePerCapita,
position = "bottomright",
title = "State-wide Income Percentiles",
labFormat = labelFormat(digits=1))
感謝您的期待!
沒有數據很難測試,但也許你可以使用顯示/隱藏層來訪問這兩個層(https://rstudio.github.io/leaflet/showhide.html) – MLavoie