HTTR GET next_offset

Question

在这个 API 上旋转我的轮子获取响应。我可以得到前 20 个观察值，但无法弄清楚如何遍历 20 的“Next_Offset”。

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

1. 下一个偏移量
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)
}