【发布时间】:2021-09-21 22:31:29
【问题描述】:
【问题讨论】:
标签: r
【问题讨论】:
标签: r
library(tmaptools)
library(sf)
library(leaflet)
cities <- c("Sacramento", "Santa Clarita")
cities_new <- geocode_OSM(cities)
# query lat lon lat_min lat_max lon_min lon_max
# 1 Sacramento 38.58106 -121.4939 38.43757 38.68551 -121.5601 -121.3627
# 2 Santa Clarita 34.39166 -118.5426 34.34145 34.49610 -118.6133 -118.3788
cities.sf <- cities_new %>% st_as_sf(coords = c("lon", "lat"), crs = 4326)
cities.buffer <- cities.sf %>% sf::st_buffer( dist = 120700)
leaflet() %>% addTiles() %>%
addCircleMarkers(data = cities.sf, color = "red") %>%
addPolygons(data = cities.buffer)
【讨论】:
Error in geocode_OSM(cities1) : could not find function "geocode_OSM"