Description Usage Arguments Examples
Add wms tile layer to the map
1 2 | add_wms_tiles(ol, url, layers, attribution = NULL, wms_options = NULL,
options = layer_options())
|
ol |
map widget |
url |
url of the wms |
layers |
layers |
attribution |
attribution |
wms_options |
named list of wms options like |
options |
layer options |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | ## Not run:
wms_url <- "https://ahocevar.com/geoserver/wms"
layers <- c("ne:NE1_HR_LC_SR_W_DR", "topp:states")
ol() %>%
add_wms_tiles(wms_url, layers) %>%
set_view(-99.74, 32.45, zoom = 3)
ol() %>%
add_stamen_tiles() %>%
add_wms_tiles("http://ows.terrestris.de/osm/service",
layers = "TOPO-WMS",
attribution = "Do not forget to insert the attribution!",
options = layer_options(opacity = 0.5))
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.