Skip to contents
library(sf)
#> Linking to GEOS 3.12.2, GDAL 3.9.3, PROJ 9.4.1; sf_use_s2() is TRUE
library(leaflet)
library(middlesnake)

Show layers

Load geologic hazards

the long way


geohazard_url <- paste0(
  "http://geoserver.megaloptera-data.com/geoserver/Columbia/ows?",
  "service=WFS&version=1.1.0&request=GetFeature",
  "&typeName=Columbia:columbia-geologic-hazard",
  "&outputFormat=application/json"
)


geo_hazards_sf <- st_read(geohazard_url)

the easy way

Load it into your environment or save it.


get_geoserver_layer("columbia-geologic-hazard")