# NOT RUN {
# Get water body surrounding a particular point:
lat <- 54.33601
lon <- -3.07677
key <- "natural"
value <- "water"
x <- opq_enclosing (lon, lat, key, value) %>%
opq_string () %>%
osmdata_sf ()
# }
Run the code above in your browser using DataLab