setView() dictionary in R Shiny Leaflet Maps

Question

我目前正在创建一个使用Leaflet Map的RShiny应用程序。作为一项功能，我需要放大某些大洲(基于用户的选择(。

• 每个大陆(例如亚洲、非洲等(是否有setView()词典？
• 是否还有另一种方法可以根据地图上的点计算出setView()？

Answer 1

你可以使用光子包：

library(photon)
library(leaflet)
location <- "Africa"
geo <- geocode(location, limit = 1, key = "place")
leaflet() %>% addTiles() %>% setView(lng = geo$lon, lat = geo$lat, zoom  = 3)