Skip to content

Instantly share code, notes, and snippets.

@patperu

patperu/wassermarsch.R

Last active August 28, 2019 17:57
Show Gist options
  • Save patperu/112f4730a690092d1dabb642b8b7bc2a to your computer and use it in GitHub Desktop.
Save patperu/112f4730a690092d1dabb642b8b7bc2a to your computer and use it in GitHub Desktop.
Download ZIP
Wasser Marsch! - in Friedrichshain-Kreuzberg
Display the source blob
Display the rendered blob
Raw
wassermarsch.geojson
Sorry, something went wrong. Reload?
Sorry, we cannot display this file.
Sorry, this file is invalid so it cannot be displayed.
Raw
wassermarsch.R
# Source: https://daten.berlin.de/datensaetze/wasser-marsch-friedrichshain-kreuzberg
library(sf)
x <- read_sf("https://www.gis-broker.de/gb/wfs/data/fk/s_wama?service=wfs&version=2.0.0&request=GetFeature&TYPENAMES=s_wama&outputFormat=application/json")
x <- sf::st_transform(x, crs = 4326)
write_sf(x, "wassermarsch.geojson", delete_dsn=TRUE)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment