addSidebyside | R Documentation |
A Leaflet control to add a split screen to compare two map overlays. The plugin works with Panes, see the example.
addSidebyside(
map,
layerId = NULL,
leftId = NULL,
rightId = NULL,
options = list(thumbSize = 42, padding = 0)
)
map |
a map widget |
layerId |
the layer id, needed for |
leftId |
the |
rightId |
the |
options |
A list of options. Currently only |
the new map
object
It is currently not working correctly if the baseGroups
are
defined in addLayersControl
.
https://github.com/digidem/leaflet-side-by-side
Other Sidebyside Functions:
removeSidebyside()
library(leaflet)
library(leaflet.extras2)
leaflet(quakes) %>%
addMapPane("left", zIndex = 0) %>%
addMapPane("right", zIndex = 0) %>%
addTiles(
group = "base", layerId = "baseid",
options = pathOptions(pane = "right")
) %>%
addProviderTiles(providers$CartoDB.DarkMatter,
group = "carto", layerId = "cartoid",
options = pathOptions(pane = "left")
) %>%
addCircleMarkers(
data = breweries91[1:15, ], color = "blue", group = "blue",
options = pathOptions(pane = "left")
) %>%
addCircleMarkers(data = breweries91[15:20, ], color = "yellow", group = "yellow") %>%
addCircleMarkers(
data = breweries91[15:30, ], color = "red", group = "red",
options = pathOptions(pane = "right")
) %>%
addLayersControl(overlayGroups = c("blue", "red", "yellow")) %>%
addSidebyside(
layerId = "sidecontrols",
rightId = "baseid",
leftId = "cartoid"
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.