我试图从R中的Google Places API获取餐厅详细信息。我可以成功获得Google提供的20个结果,但是我意识到,随着它返回next_page_token
,这意味着那里意味着那里。还有其他结果(合乎逻辑的是,我正在搜索的位置的50公里半径周围有20多家餐厅)。但是,当我使用next_page_token
时,它返回NULL
。这是我的代码:
install.packages("googleway")
library(googleway)
key <- 'my key'
df_places <- google_places(search_string = "restaurant",
location = c(-33, 151),
page_token = "next_page_token",
radius = 50000,
key = key)
df_places$results$name
df_places$results$rating
df_places$results$formatted_address
df_places$results$geometry$location
,这是没有next_page_token
的返回的内容:
[1] "Gennaro's Italian Restaurant"
[2] "Mount Broke Wines & Restaurant"
[3] "Oak Dairy Bar"
[4] "Bimbadgen"
[5] "Subway Restaurant"
[6] "Muse Restaurant"
[7] "Ocean Restaurant"
等...
这是用next_page_token
返回的:
> df_places$results$name
NULL
只是想知道我做错了什么可以反复返回NULL
?
要检查的第一件事,是使用引用的字符串"next_page_token"
还是从结果到第一个查询到google_places()
next_page_token
这是您的代码的工作示例
library(googleway)
key <- 'api_key'
df_places <- google_places(search_string = "restaurant",
location = c(-33, 151),
radius = 50000,
key = key)
token <- df_places$next_page_token
df_next_places <- google_places(search_string = "restaurant",
location = c(-33, 151),
page_token = token,
radius = 50000,
key = key)
df_places$results$name[1:5]
# [1] "Gennaro's Italian Restaurant" "Mount Broke Wines & Restaurant"
# [3] "Oak Dairy Bar" "Bimbadgen"
# [5] "Subway Restaurant"
df_next_places$results$name[1:5]
# [1] "RidgeView Restaurant" "Emerson's Cafe and Restaurant"
# [3] "EXP. Restaurant" "Margan Restaurant & Winery"
# [5] "AL-Oi Thai Restaurant"