Leaflet con capas WMS de Correos, Catastro, etc.
Esta entrada es un subproducto del trabajo que pocería que he realizado estos días en caRtociudad
.
caRtociudad
permite generar mapas estáticos al estilo de ggmap
. Iba a poner algún ejemplo, pero los dejo para otro día.
La cosa es que mejorando caRtociudad::get_cartociudad_map
, se me ha pasado por la cabeza la posibilidad de realizar la integración no ya con ggmap
sino con leaflet
. Y así (¡probadlos!), para los códigos postales,
library(leaflet)
leaflet() %>% addTiles() %>%
setView(-3.703399, 40.41688, zoom = 14) %>%
addWMSTiles(
"http://www.ign.es/wms-inspire/ign-base",
layers = "codigo-postal",
options = WMSTileOptions(format = "image/png",
transparent = TRUE),
tileOptions(tms = TRUE),
attribution = "")
Para las secciones censales,