r语言 - HTTR GET next_offset

Question

在这个API Get响应上旋转我的轮子。我可以得到前20个观察值，但不知道如何迭代"nextoffset";

GET响应的内容返回2个列表:

下抵消

2. 20个名单列表

我试图通过每20页分页，直到没有数据，并在每次迭代绑定数据到最终列表。

authHeader <- add_headers(Authorization = paste("Bearer",apiKey))
resp <- GET(
paste0(connectServer, apiPrefix),
authHeader)
payload <- content(resp)
### Create empty list to bind during pagination
payload_list <- list()

while(length(payload$next_offset) > 0) {

newdata <- payload$records

cbind(payload_list,newdata )

nextPage <- payload$records + 1

resp <- GET(
paste0(connectServer, apiPrefix, "&page_number=", nextPage),
authHeader
)
payload <- content(resp)
}

任何帮助都是非常感谢的

Answer 1

我可以使用

来解决这个问题

while(length(payload$next_offset) > 0) {

newdata <- payload$records

cbind(payload_list,newdata )

nextPage <- payload$new_offset

resp <- GET(
paste0(connectServer, apiPrefix, "?offset=", nextPage),
authHeader
)
payload <- content(resp)
}