R/plugin-layerswitcher.R

In crazycapivara/openlayersr: An R Interface to 'OpenLayers'

#' @describeIn controls Add layer switcher to the map
#'
#' @export
add_layer_switcher <- function(ol) {
  ol$dependencies <- c(
    ol$dependencies,
    layerswitcher_dependencies()
  )
  invoke_method(ol, "addLayerSwitcher")
}