一种从 R 访问 google 街景的方法?
A way to access google streetview from R?
ggmap
提供了一个非常好的 google 地球图像界面。例如:
ggmap::get_map(location = c(lon = -95.3632715, lat = 29.7632836),
maptype ="satellite",zoom=20)
将 return 来自 Google Maps/Earth 的卫星地图图像。在 Google 地图网站上,如果你再放大一点,它就会切换到街景。 R有没有类似的方法来获取街景图像?
似乎确实有一个 API,但在 R 中找不到任何类似于 ggmap
接口的东西。
当前没有执行此操作的 R 包,但是我可以为您提供 2 个技巧来完成这项工作。
我的 googleway
package has a google map widget (and also works with Shiny).
您需要一个有效的 Google API 密钥才能使用它
library(googleway)
key <- "your_api_key"
df <- data.frame(lat = -37.817714,
lon = 144.967260,
info = "Flinders Street Station")
google_map(key = key, height = 600, search_box = T) %>%
add_markers(data = df, info_window = "info")
## other available methods
# add_markers
# add_heatmap
# add_circles
# add_traffic
# add_bicycling
# add_transit
卫星
卫星/街道
街景
(注意标记仍然存在)
更新 - 静态街景地图
还有一个 google_streetview()
函数可以下载静态街景图像(使用 Google 街景静态图像 API)
google_streetview(location = c(-37.8177, 144.967),
size = c(400,400),
panorama_id = NULL,
output = "plot",
heading = 90,
fov = 90,
pitch = 0,
response_check = FALSE,
key = key)
ggmap
提供了一个非常好的 google 地球图像界面。例如:
ggmap::get_map(location = c(lon = -95.3632715, lat = 29.7632836),
maptype ="satellite",zoom=20)
将 return 来自 Google Maps/Earth 的卫星地图图像。在 Google 地图网站上,如果你再放大一点,它就会切换到街景。 R有没有类似的方法来获取街景图像?
似乎确实有一个 API,但在 R 中找不到任何类似于 ggmap
接口的东西。
当前没有执行此操作的 R 包,但是我可以为您提供 2 个技巧来完成这项工作。
我的 googleway
package has a google map widget (and also works with Shiny).
您需要一个有效的 Google API 密钥才能使用它
library(googleway)
key <- "your_api_key"
df <- data.frame(lat = -37.817714,
lon = 144.967260,
info = "Flinders Street Station")
google_map(key = key, height = 600, search_box = T) %>%
add_markers(data = df, info_window = "info")
## other available methods
# add_markers
# add_heatmap
# add_circles
# add_traffic
# add_bicycling
# add_transit
卫星
卫星/街道
街景
(注意标记仍然存在)
更新 - 静态街景地图
还有一个 google_streetview()
函数可以下载静态街景图像(使用 Google 街景静态图像 API)
google_streetview(location = c(-37.8177, 144.967),
size = c(400,400),
panorama_id = NULL,
output = "plot",
heading = 90,
fov = 90,
pitch = 0,
response_check = FALSE,
key = key)