knitr::opts_chunk$set( collapse = TRUE, dev = "ragg_png", fig.width = 10, out.width = "100%", dpi = 300, fig.retina = 3, fig.asp = .7 )
library(pragr)
prg <- CzechData::load_RUIAN_settlement(pragr::prg_kod)
plot(prg, max.plot = 1)
ggplot2::ggplot() + prg_basemap(prg, image_service = "https://gs-pub.praha.eu/imgs/rest/services/geo/ig_mapy_geologicke_pomery/ImageServer", buffer = 100, width = 2000)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.