# Cargamos librerias necesarias
library(readr)
library(tidyverse)
library(sf)
library(mapSpain)
library(leaflet)
library(kableExtra)
library(tidyr)
library(st)
library(ggplot2)
# Leemos el conjunto de datos y observamos las características del mismo
bienes_inmuebles_GV <- st_read("data/13_GeoPat.gpkg")
Bienes inmuebles Generalitat Valenciana
Input
En este caso se trabajará con una base de datos del IDEV (Infraestructura de Datos Espaciales Valenciana), un dataset en formato geopackage.
En la base de datos podemos encontrar Bienes inmuebles propiedad de la Generalitat Valenciana. Información geográfica temática propiedad de la Dirección General de Sector Público y Patrimonio de la Conselleria de Hacienda y Modelo Económico con su respectiva geometría de los inmuebles mejorada a partir de los datos publicados por Catastro.
Sin embargo, existe el inconveniente de que la Generalitat Valencia también posee ciertos bienes inmuebles en territorios pertenecientes a otra comunidades. Como el objetivo es realizar un estudio sobre los bienes inmuebles poseidos por Generalitat dentro del territorio de la comunidad se buscará extraer del dataset aquellas observaciones que no esten situadas en el terreno objeto de estudio.
Información complementaria sobre la base de datos:
- Escala: 1/5000
- Fecha de creación: 03/11/2020
- Formatos disponibles: CSV, GPKG y enlace WMS
- Licencia de uso: http://www.icv.gva.es/condiciones-de-uso-de-la-geoinformacion-icv
- Sistema de referencia de coordenadas: EPSG:25830
Descripción
glimpse(bienes_inmuebles_GV)
Rows: 10,514
Columns: 32
$ id <chr> "8181", "1", "2", "3", "887", "4", "5", "…
$ provincia <chr> "12", "46", "46", "46", "46", "46", "46",…
$ municipio <chr> "082", "181", "181", "181", "193", "181",…
$ cod_catastro <chr> "12082", "46183", "46183", "46183", "4619…
$ orden <chr> "016", "009", "009", "009", "009", "009",…
$ subinmueble <chr> "000", "000", "000", "000", "000", "000",…
$ referencia <chr> "3359812YK4135N0002TX", "46183A0170029000…
$ denominacion <chr> "AMPLIACION PALACIO JUSTICIA", "PARQUE NA…
$ denominacion_val <chr> "AMPLIACION PALACIO JUSTICIA", "PARQUE NA…
$ direccion <chr> "CL SAN AGUSTIN Nº54", "", "", "", "CL SE…
$ direccion_val <chr> "CL SAN AGUSTIN Nº54", "", "", "", "CL SE…
$ derechos <chr> "Propiedad", "Propiedad", "Propiedad", "P…
$ derechos_val <chr> "Propietat", "Propietat", "Propietat", "P…
$ lista_rf <chr> "3359812YK4135N0002TX", "46183A0150058300…
$ lista_ads <chr> "CONSELLERIA DE JUSTICIA E INTERIOR", "CO…
$ lista_ads_val <chr> "CONSELLERIA DE JUSTICIA E INTERIOR", "CO…
$ afectacion <chr> "JUD", "PMA", "PMA", "PMA", "DOC", "PMA",…
$ desc_afectacion_val <chr> "Judicial", "Protecció del medi ambient",…
$ desc_afectacion <chr> "Judicial", "Protección del medio ambient…
$ ti_inmueble <chr> "Construcción", "Suelo", "Suelo", "Suelo"…
$ ti_inmueble_val <chr> "Construcció", "Sòl", "Sòl", "Sòl", "Cons…
$ clasificacion_suelo <chr> "URB", "", "", "", "URB", "", "", "", "",…
$ desc_clasificacion_suelo <chr> "Suelo urbano", "", "", "", "Suelo urbano…
$ desc_clasificacion_suelo_val <chr> "Sòl urbà", "", "", "", "Sòl urbà", "", "…
$ superficie_construida <chr> "250", "0", "0", "0", "7179.18", "0", "0"…
$ superficie_suelo <chr> "", "598155.1", "598155.1", "598155.1", "…
$ desc_provincia <chr> "Castelló/Castellón", "València/Valencia"…
$ desc_municipio <chr> "Nules", "Oliva", "Oliva", "Oliva", "Pica…
$ fecarga <chr> "2024-05-12 23:00:06", "2024-05-12 23:00:…
$ link_catastro <chr> "https://www1.sedecatastro.gob.es/CYCBien…
$ visiblevisor <chr> "S", "S", "S", "S", "S", "S", "S", "S", "…
$ geom <POLYGON [m]> POLYGON ((743221.2 4415761,..., P…
El dataset de bienes inmuebles de la Generalitat Valenciana consta de 10,517 registros y 32 columnas. Cada fila representa un bien inmueble, con información detallada como su identificación, ubicación por provincia y municipio, características catastrales, denominación y dirección. Además, se incluyen detalles sobre los derechos de propiedad, la afectación del terreno, el tipo de inmueble y la clasificación del suelo. Destacan las columnas que contienen información sobre la superficie construida y la superficie del suelo, así como la geometría de los inmuebles representada como polígonos en la columna geom.
# Cambiamos el sistema de referencia para poder representar los datos
data <- sf::st_transform(bienes_inmuebles_GV, crs=4326)
# Representación gráfica
data %>%
leaflet::leaflet() %>%
leaflet::addTiles() %>%
leaflet::addPolygons()