在传单中的“addLayersControl”中添加“RasterLayer”

我必须

RasterLayer

-对象（

raster1

和

raster2

）在R中。我想将它们都添加到传单地图中。我还想拥有显示或隐藏它们的选项。所以我想我应该把它们和它们的名字一起添加到

addLayersControl

-选项中。但它不起作用。它同时显示两个图层，我无法隐藏它们。到目前为止，我的代码是这样的。我认为问题在于如何将它们添加到

addLayersControl

-函数中

leaflet() %>%
  addTiles() %>%
  addRasterImage(raster1, opacity = 0.3) %>% 
  addRasterImage(raster2, opacity = 0.3) %>% 
  addLayersControl(
    baseGroups = c("OSM (default)"),
    overlayGroups = c("raster1", "raster2"),
    options = layersControlOptions(collapsed = FALSE)
  )

---

我想这很容易，但我想不出任何解决方案。

来自

addLayersControl

：

覆盖组
字符向量，其中每个元素都是组的名称。用户可以独立地打开或关闭每个覆盖组

所以你需要团队。从

addRasterImage

：

集团
此光栅图像应属于的组的名称（请参见addTiles下的相同参数）

您的代码需要如下所示：

leaflet() %>%
  addTiles() %>%
  addRasterImage(raster1, opacity = 0.3, group = 'raster1') %>% 
  addRasterImage(raster2, opacity = 0.3, group = 'raster2') %>% 
  addLayersControl(
    baseGroups = c("OSM (default)"),
    overlayGroups = c("raster1", "raster2"),
    options = layersControlOptions(collapsed = FALSE)
  )