r - 如何在Shiny Leaflet map 中将图层置于顶部

我有一张地图，上面有不同的多边形，这些多边形在许多点处相交，由于一些计算和绘图过程，它们可以随机地彼此叠置。
但是有一组多边形应始终位于顶部，因为它们具有附加的弹出窗口。

不幸的是

leafletProxy("map") %>% showGroup("Layer1") %>% showGroup("Layer2")

要么

leafletProxy("map") %>% hideGroup("Layer1") %>% hideGroup("Layer2") %>%
showGroup("Layer1") %>% showGroup("Layer2")

不会更改多边形的顺序。

bringToFront包和leaflet是否有可能像shiny一样？

最佳答案

意识到这已经有四年了，但是我遇到了同样的问题，可以通过addMapPane解决。在上面的例子中

leafletProxy("map") %>% addMapPane("layer1", zIndex=420) %>% addMapPane("layer2",zIndex=410)

这样，在相交的任何地方，layer1都将保持在layer2之上。这只是将图层分配给多边形或其他多边形的问题。例如：

leafletProxy("map") %>% addPolygons(data=layer1_data,options = pathOptions(pane = "layer1")) %>% addPolygons(data=layer2_data, options= options = pathOptions(pane = "layer2"))