Include raster tiles for Prague in ggplot2

prg_tile(
  data,
  tile_service = "orto",
  zoom = 6,
  alpha = 1,
  buffer = 0,
  verbose = F
)

Arguments

data

sf data frame from which to extract the bounding box

tile_service

map service from which to draw the map (see prg_endpoints), or a URL of a service.

zoom

zoom level, from 0 to the service's limit

alpha

transparency of the tiles.

buffer

distance between feature end and tile end; for EPSG 5514 in meters.

verbose

display information on tile URLs and image processing.

Value

list including raster annotation layers for ggplot2

Examples

if (FALSE) {
praha1 <- CzechData::load_RUIAN_settlement(prg_kod, "MOMC_P", WGS84 = F) %>%
  filter(nazev == 'Praha 1')

ggplot() +
prg_tile(data = praha1, zoom = 10, alpha = .7, buffer = 200,
         tile_service = 'orto') +
  geom_sf(data = praha1, fill = alpha("red", 0.6), colour = NA) +
  theme_void()
}