View source: R/create_provider.R
create_provider | R Documentation |
Use this function to create new tiles provider.
create_provider(name, url, sub = NA, citation)
name |
name of the provider. |
url |
url of the provider. The url must contain {x}, {y} and {z} placeholders. It may also contain {s} for sub-domains or {apikey} for API keys (see Examples). |
sub |
sub-domains. |
citation |
attribution text of the provider. |
a list is returned. This list can be used by get_tiles.
statdia_toner <- create_provider(
name = "stadia_stamen_toner",
url = "https://tiles.stadiamaps.com/tiles/stamen_toner/{z}/{x}/{y}.png?api_key={apikey}",
citation = "© Stadia Maps © Stamen Design © OpenMapTiles © OpenStreetMap contributors"
)
opentopomap <- create_provider(
name = "otm",
url = "https://{s}.tile.opentopomap.org/{z}/{x}/{y}.png",
sub = c("a", "b", "c"),
citation = "map data: © OpenStreetMap contributors, SRTM | map style: © OpenTopoMap (CC-BY-SA)"
)
IGN <- create_provider(
name = "orthophoto_IGN",
url = paste0(
"https://wxs.ign.fr/ortho/geoportail/wmts?",
"&REQUEST=GetTile",
"&SERVICE=WMTS",
"&VERSION=1.0.0",
"&STYLE=normal",
"&TILEMATRIXSET=PM",
"&FORMAT=image/jpeg",
"&LAYER=ORTHOIMAGERY.ORTHOPHOTOS.BDORTHO",
"&TILEMATRIX={z}",
"&TILEROW={y}",
"&TILECOL={x}"
),
citation = "IGN, BD ORTHO®"
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.