KOSTRA

link_to_coord_help <- "https://epsg.io/transform#s_srs=4326&t_srs=3034"

 
# Example default values Herne
herne <- r2q::get_KOSTRA(
  coord_vector = c(3813634.44, 2753912.5), 
  duration_string = 10, 
  location_name = "Herne")
#> Reading layer `StatRR_KOSTRA-DWD-2010R_D0010' from data source 
#>   `/tmp/Rtmp8qzhz3/Rinst11cf6cdc5c4a/r2q/extdata/KOSTRA/GIS_KOSTRA-DWD-2010R_D0010' 
#>   using driver `ESRI Shapefile'
#> Simple feature collection with 8453 features and 10 fields
#> Geometry type: POLYGON
#> Dimension:     XY
#> Bounding box:  xmin: 3710675 ymin: 2271848 xmax: 4354525 ymax: 3149248
#> Projected CRS: ETRS89-extended / LCC Europe
#> Warning: `aes_string()` was deprecated in ggplot2 3.0.0.
#> ℹ Please use tidy evaluation idioms with `aes()`.
#> ℹ See also `vignette("ggplot2-in-packages")` for more information.
#> ℹ The deprecated feature was likely used in the r2q package.
#>   Please report the issue at <https://github.com/KWB-R/r2q/issues>.
#> This warning is displayed once per session.
#> Call `lifecycle::last_lifecycle_warnings()` to see where this warning was
#> generated.

plotly::ggplotly(herne$plot)

knitr::kable(herne$data)

# Example 10 min for Berlin
berlin <- r2q::get_KOSTRA(coord_vector = c(4217676.98, 2862423.69),
                duration_string = "0010",
                location_name = "Berlin", 
                plot = TRUE)
#> Reading layer `StatRR_KOSTRA-DWD-2010R_D0010' from data source 
#>   `/tmp/Rtmp8qzhz3/Rinst11cf6cdc5c4a/r2q/extdata/KOSTRA/GIS_KOSTRA-DWD-2010R_D0010' 
#>   using driver `ESRI Shapefile'
#> Simple feature collection with 8453 features and 10 fields
#> Geometry type: POLYGON
#> Dimension:     XY
#> Bounding box:  xmin: 3710675 ymin: 2271848 xmax: 4354525 ymax: 3149248
#> Projected CRS: ETRS89-extended / LCC Europe

plotly::ggplotly(berlin$plot)

knitr::kable(berlin$data)