从传单贴图R/s中删除多边形

我在地图上画了一个多边形，我在一个闪亮的应用程序中使用它。 每次触发事件时，我都要删除旧多边形并在其上绘制新多边形。 这不起作用-我假设我使用了

layerId

错误

有什么提示吗

# draw polygons
observeEvent(da$ar, {
    # remove polygon
    removeShape(map, layerId = unique(10))

    leafletProxy("myMap") %>% addPolygons(data = da$ar, stroke = TRUE, 
    fillOpacity = 0.5, smoothFactor = 0.5,
    layerId = unique(10)
    )
})

所以，我去了。 在对象上使用图层ID并再次使用该图层ID绘制同一对象时，该对象将被删除

所以，这就足够了：

 observeEvent(da$ar, {

    leafletProxy("myMap") %>% addPolygons(data = da$ar, stroke = TRUE, 
    fillOpacity = 0.5, smoothFactor = 0.5,
    layerId = "foo"
    ) 
 })

所以，我去了。 在对象上使用图层ID并再次使用该图层ID绘制同一对象时，该对象将被删除

所以，这就足够了：

 observeEvent(da$ar, {

    leafletProxy("myMap") %>% addPolygons(data = da$ar, stroke = TRUE, 
    fillOpacity = 0.5, smoothFactor = 0.5,
    layerId = "foo"
    ) 
 })