diff --git a/DESCRIPTION b/DESCRIPTION index 36e7bb5c..f792b7df 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -43,7 +43,7 @@ Copyright: © EuroGeographics for the administrative boundaries. Atlas Encoding: UTF-8 LazyData: true Roxygen: list(markdown = TRUE) -RoxygenNote: 7.2.0 +RoxygenNote: 7.2.1 X-schema.org-applicationCategory: cartography X-schema.org-isPartOf: https://ropenspain.es/ X-schema.org-keywords: rOpenSpain, tiles, r, maps, spatial, rstats, diff --git a/NEWS.md b/NEWS.md index 14e14263..fd02c958 100644 --- a/NEWS.md +++ b/NEWS.md @@ -1,5 +1,7 @@ # mapSpain (development version) +- Now `moveCAN` is a explicit parameter in the relevant functions. + - Deprecate `layer_spatraster().` Use `tidyterra::geom_spatraster_rgb()` instead. diff --git a/R/esp_get_ccaa.R b/R/esp_get_ccaa.R index 759a188a..47d526a2 100644 --- a/R/esp_get_ccaa.R +++ b/R/esp_get_ccaa.R @@ -91,7 +91,7 @@ #' ) + #' theme(panel.background = element_rect(fill = "#C7E7FB")) #' } -esp_get_ccaa <- function(ccaa = NULL, ...) { +esp_get_ccaa <- function(ccaa = NULL, moveCAN = TRUE, ...) { params <- list(...) # Get region id @@ -110,6 +110,7 @@ esp_get_ccaa <- function(ccaa = NULL, ...) { params$region <- nuts_id params$nuts_level <- 2 + params$moveCAN <- moveCAN data_sf <- do.call(mapSpain::esp_get_nuts, params) diff --git a/R/esp_get_country.R b/R/esp_get_country.R index 6fa5f216..426b88af 100644 --- a/R/esp_get_country.R +++ b/R/esp_get_country.R @@ -11,6 +11,7 @@ #' #' @export #' +#' @inheritParams esp_get_nuts #' @inheritDotParams esp_get_nuts -nuts_level -region -spatialtype #' #' @inheritSection esp_get_nuts About caching @@ -39,10 +40,12 @@ #' #' ggplot(MovedCan) + #' geom_sf(fill = "grey70") -esp_get_country <- function(...) { +esp_get_country <- function(moveCAN = TRUE, ...) { params <- list(...) params$nuts_level <- 1 params$region <- NULL + params$moveCAN <- moveCAN + data_sf <- do.call(mapSpain::esp_get_nuts, params) # Extract geom column diff --git a/R/esp_get_prov.R b/R/esp_get_prov.R index d47365a6..a276cd1d 100644 --- a/R/esp_get_prov.R +++ b/R/esp_get_prov.R @@ -97,7 +97,7 @@ #' ) + #' theme_void() #' } -esp_get_prov <- function(prov = NULL, ...) { +esp_get_prov <- function(prov = NULL, moveCAN = TRUE, ...) { params <- list(...) # Get region id @@ -123,7 +123,7 @@ esp_get_prov <- function(prov = NULL, ...) { params$region <- nuts_id params$nuts_level <- 3 - + params$moveCAN <- moveCAN data_sf <- do.call(mapSpain::esp_get_nuts, params) diff --git a/codemeta.json b/codemeta.json index 8e2745a3..320277de 100644 --- a/codemeta.json +++ b/codemeta.json @@ -233,7 +233,7 @@ "applicationCategory": "cartography", "isPartOf": "https://ropenspain.es/", "keywords": ["rOpenSpain", "tiles", "r", "maps", "spatial", "rstats", "r-package", "municipalities", "Spain", "gisco", "provinces", "ign", "administrative-boundaries", "ccaa", "static-tiles", "spain", "cran", "ropenspain", "ggplot2", "gis"], - "fileSize": "2851.056KB", + "fileSize": "2853.662KB", "citation": [ { "@type": "SoftwareSourceCode", diff --git a/inst/WORDLIST b/inst/WORDLIST index 52cc1e99..e2259004 100644 --- a/inst/WORDLIST +++ b/inst/WORDLIST @@ -1,9 +1,20 @@ ADIF ANE +Además +Adicionalmente +AdministrativeBoundary +AdministrativeUnit Aerodromo +Alboran +Almacenamiento Andalucia AreaServicio +BDN +Baleares +Banco Bathymetry +Bienvenidos +BuildingPart CCAA CDN CECAF @@ -12,6 +23,8 @@ CEGETM CLDR CMD CNTR +COVID +CRS CadastralParcel CadastralZoning CaminoDeSantiago @@ -28,38 +41,63 @@ CaminosPortugueses CaminosSureste CaminosTolosana CaminosTuronensis +Canarias Carreteras CartoBase Cartociudad +Castellano +Catalán Catastro +Centre Ceuta Choropleth +Clasificación CodigosPostales +Comarcas +Comparamos +Comparando +Creación +Cuando Cuencas CurvasNivel DOI Datos +Dev +Diccionario Direcciones +Disponibles +Distintos +EEA EPSG +ESDAC ETRS +El Elevaciones Espaciales España +Esquemas Estaciones EstacionesFerroviario Estadistica +Estas +Este EuroGeographics Eurostat FID Ferroviario ForestLeaf +Funciones +GADM GISCO Galician +Gallego Geodata Geofisica Geografico Geográfico GrassLand +HOTFIX +Hernangomez Hexbin Hidrografia Humedales @@ -69,7 +107,11 @@ IDErioja IGN IGNBase INE +ISCII +Imágenes Infraestructura +Inglés +Instalación Instituto LAEA LATN @@ -78,50 +120,76 @@ LEVL LandCover LazyLoad LiDAR +Liedekerke Limites LimitesMaritimos LineaCosta LineasBase +Límites +MITECO MTN ManMade +Mapa +Mapas MasaAgua MaximaActualidad Melilla Militar +Montanarella Mosaico +Motivación +Municipios Nacional Natura +Naturaleza +Niveles Nodos NombresGeograficos Ocupacion OcupacionSuelo OpenStreetMap Orto +Otros PNOA +Panagos Parcela ParquesNaturales +Por Precompute +Proporciona +Proporcionamos +Provincias +Provinicas Puertos +Página QUICKFIX README +REGCAN RGBA RedTransporte +RegCan Renviron +Resultados Rioja's RiparianGreen RiparianLandCover SIANE SoilSeal Subcuencas +Tenemos Tenerife Terremotos Todo TodoNoFondo +Topografico URBN +Un Unidades UnidadesAdm UrbanAtlas +Usando Usos +Vasco Verwaltungsgrenzen Vias VigilanciaVolcanica @@ -131,13 +199,31 @@ WMTS WaterWet YYYY ZonasPerifericas +adicionales administratives -aes +administrativos +ahora +al +alboran +alrededor +alternativas +altitud +amplios +analisis +archivos +así +bandas basemaps bathymetry bezüglich +bien +capas +capta +carreteras +caso ccaa centroid +ceuta choropleth choropleths cldr @@ -145,43 +231,223 @@ cmun codauto codecov codelist +codificación +comarcas +como +componer +comportamiento config +configuración +consiste +contiene +contorno +convierte cpro +creación +cuadrados +cuencas +códigos +datos de +debe +defecto +del der +desactivar +descarga +descargar +desean +desplaza +detallados df dias +dieghernan +diferentes +dinámica +dinámicos dir +directorio +dispone +distintos doi +durante +ec +ejemplo +ejemplos +el +empleadas +emplear +entidad +esa +esdac +espaciales +específico +esta +estableciendo +estadística +este +estática +estáticos eu +europa +exploramos +extraer +extraido +facilita +ferroviarias +fondo +formato +fuente +fuentes +funciones +función ga geojson +georeferenciada geospatial ggplot ggspatial giscoR github +hacer +han hexbin +hexágonos +hidrográficas +homogeneizar https hydrographic hypsometry +idee +idiomas ign +imagen +imágenes +incluye ine +información +infraestructuras +inserción +interactivos io iso javascript +jrc +kms lang +las les limites +lineas +los +límites +líneas +manera +manipulación +mapSpain’ +mapa +mapas mapsf -natively +mayoría +mejor +melilla +modificar +muy +más +necesariamente +necesiten +niveles +nombres +normalizar +objetos +obtenemos +obtener +obtenidas +opciones +orden +organismos +organísmos +otras +otros +paises +paquete +paquetes +param +parámetro +pasamos +país +permite +permiten +persistente +podemos +políticos +por +posibilidad +proceso +proporciona +proporcionados +proporcionan +proveedores +providerESP providersESP +provincias +proyecciones +puede +pueden +puntos +públicos +que rOS -rasterVis +realizar +recursos +relacionadas +representar +resolución +resultantes +rios +rnaturalearth ropenspain roxygen +rápido +ráster +satisfactorios +satélite +se +segun +ser +servicio +servicios +sesión shortname sianedata +sobre +soportados spanish +su +sus +también +teselas +textos +tipo tmap +todas +trabaja +trabajar +transformación +través +un +una +usa +usando +usar +uso +usuario +utilidad +varias +ver +versiones +versión +visualización +www zenodo +ámbitos diff --git a/man/esp_get_ccaa.Rd b/man/esp_get_ccaa.Rd index d628244b..0004a8d6 100644 --- a/man/esp_get_ccaa.Rd +++ b/man/esp_get_ccaa.Rd @@ -9,7 +9,7 @@ IGN data via a custom CDN (see \url{https://github.com/rOpenSpain/mapSpain/tree/sianedata}). } \usage{ -esp_get_ccaa(ccaa = NULL, ...) +esp_get_ccaa(ccaa = NULL, moveCAN = TRUE, ...) esp_get_ccaa_siane( ccaa = NULL, @@ -28,6 +28,11 @@ esp_get_ccaa_siane( \item{ccaa}{A vector of names and/or codes for autonomous communities or \code{NULL} to get all the autonomous communities. See \strong{Details}.} +\item{moveCAN}{A logical \code{TRUE/FALSE} or a vector of coordinates +\code{c(lat, lon)}. It places the Canary Islands close to Spain's mainland. +Initial position can be adjusted using the vector of coordinates. See +\strong{Displacing the Canary Islands}.} + \item{...}{ Arguments passed on to \code{\link[=esp_get_nuts]{esp_get_nuts}} \describe{ @@ -64,11 +69,6 @@ default is \code{FALSE}.} \item{resolution}{Resolution of the polygon. Values available are "3", "6.5" or "10".} -\item{moveCAN}{A logical \code{TRUE/FALSE} or a vector of coordinates -\code{c(lat, lon)}. It places the Canary Islands close to Spain's mainland. -Initial position can be adjusted using the vector of coordinates. See -\strong{Displacing the Canary Islands}.} - \item{rawcols}{Logical. Setting this to \code{TRUE} would add the raw columns of the dataset provided by IGN.} } diff --git a/man/esp_get_country.Rd b/man/esp_get_country.Rd index 14bc481b..0c109614 100644 --- a/man/esp_get_country.Rd +++ b/man/esp_get_country.Rd @@ -4,9 +4,14 @@ \alias{esp_get_country} \title{Get the borders of Spain as a \code{sf} polygon} \usage{ -esp_get_country(...) +esp_get_country(moveCAN = TRUE, ...) } \arguments{ +\item{moveCAN}{A logical \code{TRUE/FALSE} or a vector of coordinates +\code{c(lat, lon)}. It places the Canary Islands close to Spain's mainland. +Initial position can be adjusted using the vector of coordinates. See +\strong{Displacing the Canary Islands}.} + \item{...}{ Arguments passed on to \code{\link[=esp_get_nuts]{esp_get_nuts}} \describe{ @@ -35,10 +40,6 @@ default is \code{FALSE}.} \item "03": 1:3million \item "01": 1:1million }} - \item{\code{moveCAN}}{A logical \code{TRUE/FALSE} or a vector of coordinates -\code{c(lat, lon)}. It places the Canary Islands close to Spain's mainland. -Initial position can be adjusted using the vector of coordinates. See -\strong{Displacing the Canary Islands}.} }} } \value{ diff --git a/man/esp_get_prov.Rd b/man/esp_get_prov.Rd index 5b489b8e..13a64c02 100644 --- a/man/esp_get_prov.Rd +++ b/man/esp_get_prov.Rd @@ -9,7 +9,7 @@ IGN data via a custom CDN (see \url{https://github.com/rOpenSpain/mapSpain/tree/sianedata}). } \usage{ -esp_get_prov(prov = NULL, ...) +esp_get_prov(prov = NULL, moveCAN = TRUE, ...) esp_get_prov_siane( prov = NULL, @@ -28,6 +28,11 @@ esp_get_prov_siane( \item{prov}{A vector of names and/or codes for provinces or \code{NULL} to get all the provinces. See \strong{Details}.} +\item{moveCAN}{A logical \code{TRUE/FALSE} or a vector of coordinates +\code{c(lat, lon)}. It places the Canary Islands close to Spain's mainland. +Initial position can be adjusted using the vector of coordinates. See +\strong{Displacing the Canary Islands}.} + \item{...}{ Arguments passed on to \code{\link[=esp_get_nuts]{esp_get_nuts}} \describe{ @@ -64,11 +69,6 @@ default is \code{FALSE}.} \item{resolution}{Resolution of the polygon. Values available are "3", "6.5" or "10".} -\item{moveCAN}{A logical \code{TRUE/FALSE} or a vector of coordinates -\code{c(lat, lon)}. It places the Canary Islands close to Spain's mainland. -Initial position can be adjusted using the vector of coordinates. See -\strong{Displacing the Canary Islands}.} - \item{rawcols}{Logical. Setting this to \code{TRUE} would add the raw columns of the dataset provided by IGN.} } diff --git a/vignettes/articles/x02_mapasesp.Rmd b/vignettes/articles/x02_mapasesp.Rmd index 36d5e804..55e11e8c 100644 --- a/vignettes/articles/x02_mapasesp.Rmd +++ b/vignettes/articles/x02_mapasesp.Rmd @@ -140,7 +140,7 @@ esp_gdam <- gadm_sf_loadCountries("ESP") esp_mapSpain <- esp_get_country(epsg = 4326) # Imagen Ria Ferrol -tile <- esp_getTiles(esp_get_munic(munic = "Ferrol"), "PNOA", +tile <- esp_getTiles(esp_get_munic(munic = "Ferrol"), "IGNBase.Gris", bbox_expand = 0.5, zoommin = 1 ) @@ -168,7 +168,7 @@ ggplot(esp_all) + ylim = c(43.43201, 43.59545), expand = FALSE ) + - scale_color_manual(values = hcl.colors(3, "Berlin")) + + scale_color_manual(values = c("red", "blue", "black")) + theme_void() + labs(title = "Ría de Ferrol") ```