Using services identified by URL
prg <- CzechData::load_RUIAN_settlement(pragr::prg_kod)
#> ✔ Data downloaded and unpacked.
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)