Spatial Data Files for Berlin (Germany)
This package contains spatial data files for various administrative
boundaries in Berlin, Germany and currently one function sf_fisbroker
to convert WKS files from the Berlin Geodata Portal
“FIS-Broker”
in sf objects. I was motivated by the package
nycgeo from Matt Herman.
Data Source: Amt für Statistik Berlin-Brandenburg, Data Licence: Lizenz
CC-BY-3.0
Development version from GitHub
remotes::install_github("patperu/berlingeo")library("berlingeo")
library(berlingeo)library(sf)#> Linking to GEOS 3.6.1, GDAL 2.2.3, PROJ 4.9.3library(tidyverse)#> -- Attaching packages -------------------------------------------------------------- tidyverse 1.2.1 --#> v ggplot2 3.2.0.9000 v purrr 0.3.2#> v tibble 2.1.3 v dplyr 0.8.3#> v tidyr 0.8.3 v stringr 1.4.0#> v readr 1.3.1 v forcats 0.4.0#> -- Conflicts ----------------------------------------------------------------- tidyverse_conflicts() --#> x dplyr::filter() masks stats::filter()#> x dplyr::lag() masks stats::lag()
glimpse(lor_pgr_sf)#> Observations: 60#> Variables: 7#> $ gml_id <chr> "s_lor_prog.0101", "s_lor_prog.0102", "s_lor_prog.0...#> $ RAUMID <chr> "0101", "0102", "0103", "0104", "0201", "0202", "02...#> $ PGRNAME <chr> "Zentrum", "Moabit", "Gesundbrunnen", "Wedding", "K...#> $ BEZNAME <chr> "Mitte", "Mitte", "Mitte", "Mitte", "Friedrichshain...#> $ DATUM <chr> "2007-10-31T00:00:00", "2007-10-31T00:00:00", "2007...#> $ SHAPE_AREA <dbl> 15844742, 8239538, 5753252, 9611634, 2929465, 47540...#> $ geometry <MULTIPOLYGON [°]> MULTIPOLYGON (((13.36953 52..., MULTIP...ggplot(lor_pgr_sf) +geom_sf() +theme_minimal()
glimpse(lor_bzr_sf)#> Observations: 138#> Variables: 8#> $ gml_id <chr> "s_lor_bez.010111", "s_lor_bez.010112", ...#> $ RAUMID <chr> "010111", "010112", "010113", "010114", ...#> $ BEZIRKSREGION <chr> "Tiergarten Süd", "Regierungsviertel", "...#> $ PROGNOSERAUM <chr> "Zentrum", "Zentrum", "Zentrum", "Zentru...#> $ BEZIRK <chr> "Mitte", "Mitte", "Mitte", "Mitte", "Mit...#> $ DATUM_GUELTIG_AB <chr> "2006-06-14 00:00:00.0", "2006-06-14 00:...#> $ FLAECHENGROESSE_IN_M2 <dbl> 366755.5, 744742.1, 1685341.1, 1151740.5...#> $ geometry <MULTIPOLYGON [°]> MULTIPOLYGON (((13.36953 52...ggplot(lor_bzr_sf) +geom_sf() +theme_minimal()
glimpse(lor_plr_sf)#> Observations: 448#> Variables: 9#> $ gml_id <chr> "s_lor_plan.01011101", "s_lor_plan.01011...#> $ RAUMID <chr> "01011101", "01011102", "01011103", "010...#> $ PLANUNGSRAUM <chr> "Stülerstraße", "Großer Tiergarten", "Lü...#> $ BEZIRKSREGION <chr> "Tiergarten Süd", "Tiergarten Süd", "Tie...#> $ PROGNOSERAUM <chr> "Zentrum", "Zentrum", "Zentrum", "Zentru...#> $ BEZIRK <chr> "Mitte", "Mitte", "Mitte", "Mitte", "Mit...#> $ DATUM_GUELTIG_AB <chr> "14.06.2006", "14.06.2006", "14.06.2006"...#> $ FLAECHENGROESSE_IN_M2 <int> 366756, 3009397, 522357, 338383, 934610,...#> $ geometry <MULTIPOLYGON [°]> MULTIPOLYGON (((13.33889 52...ggplot(lor_plr_sf) +geom_sf() +theme_minimal()
sf_fisbroker("s_erhaltgeb_es") %>%ggplot() +geom_sf() +theme_minimal()#> [1] "http://fbinter.stadt-berlin.de/fb/wfs/data/senstadt/s_erhaltgeb_es?service=wfs&version=2.0.0&request=GetFeature&TYPENAMES=s_erhaltgeb_es"
Please note that the ‘berlingeo’ project is released with a Contributor
Code of Conduct. By contributing to this project,
you agree to abide by its terms.