Skip to contents

Convert to SF

Usage

convert_to_sf(
  df,
  crs_source = 25833,
  crs_target = 4326,
  col_coord_x = "Rechtswert_UTM_33_N",
  col_cood_y = "Hochwert_UTM_33_N"
)

Arguments

df

data frame or tibble with spatial data

crs_source

origingal CRS (default: 25833)

crs_target

target CRS (default: 4326)

col_coord_x

column name of latitude (default: "Rechtswert_UTM_33_N")

col_cood_y

column name of longitude (default: "Hochwert_UTM_33_N")

Value

data frame or tibble converted to sf

Examples

gwl_master <- jsonlite::fromJSON("https://kwb-r.github.io/wasserportal/stations_gwl_master.json")
convert_to_sf(gwl_master)
#> Simple feature collection with 876 features and 9 fields
#> Geometry type: POINT
#> Dimension:     XY
#> Bounding box:  xmin: 13.09291 ymin: 52.34336 xmax: 13.75514 ymax: 52.66923
#> Geodetic CRS:  WGS 84
#> First 10 features:
#>    Nummer        Bezirk Betreiber            Auspraegung
#> 1       1 Reinickendorf     Senat               GW-Stand
#> 2       2 Reinickendorf     Senat               GW-Stand
#> 3       3 Reinickendorf     Senat     GW-Stand + GW-Güte
#> 4       4 Reinickendorf     Senat               GW-Stand
#> 5       9 Reinickendorf     Senat               GW-Stand
#> 6      21 Reinickendorf     Senat               GW-Stand
#> 7      24 Reinickendorf     Senat               GW-Stand
#> 8      25 Reinickendorf     Senat               GW-Stand
#> 9      26 Reinickendorf     Senat GW-Stand, tagesaktuell
#> 10     30 Reinickendorf     Senat               GW-Stand
#>                        Grundwasserleiter Gelaendeoberkante_GOK_m_ue_NHN
#> 1   Hauptgrundwasserleiter (GWL 1.3 + 2)                          49.20
#> 2   Hauptgrundwasserleiter (GWL 1.3 + 2)                          37.65
#> 3   Hauptgrundwasserleiter (GWL 1.3 + 2)                          37.87
#> 4   Hauptgrundwasserleiter (GWL 1.3 + 2)                          39.88
#> 5  lokal ausgebildeter Grundwasserkörper                          42.14
#> 6   Hauptgrundwasserleiter (GWL 1.3 + 2)                          37.25
#> 7   Hauptgrundwasserleiter (GWL 1.3 + 2)                          40.25
#> 8   Hauptgrundwasserleiter (GWL 1.3 + 2)                          41.98
#> 9   Hauptgrundwasserleiter (GWL 1.3 + 2)                          42.70
#> 10  Hauptgrundwasserleiter (GWL 1.3 + 2)                          39.63
#>    Rohroberkante_m_ue_NHN Filteroberkante_m_u_GOK Filterunterkante_m_u_GOK
#> 1                   49.49                   37.34                    39.34
#> 2                   38.06                   15.59                    17.59
#> 3                   38.65                   12.27                    13.27
#> 4                   40.36                   16.00                    18.00
#> 5                   42.67                   17.70                    18.70
#> 6                   38.00                    8.10                     9.10
#> 7                   40.43                   10.88                    11.88
#> 8                   42.26                    5.47                     6.47
#> 9                   43.56                   11.74                    12.74
#> 10                  39.90                   12.00                    13.00
#>                     geometry
#> 1  POINT (13.29247 52.62308)
#> 2  POINT (13.31921 52.62262)
#> 3   POINT (13.3131 52.61407)
#> 4  POINT (13.29259 52.60773)
#> 5   POINT (13.35574 52.6204)
#> 6  POINT (13.32453 52.57572)
#> 7  POINT (13.35288 52.56763)
#> 8  POINT (13.36019 52.57023)
#> 9  POINT (13.36547 52.57433)
#> 10 POINT (13.35974 52.56318)