缺少页面的rbind.pages“错误：all（vapply（pages，is.data.frame，logical（1）））”不为TRUE

Question

我正在尝试使用网络中的jsonlite rbind.pages，其中缺少某些数据文件（例如缺少aa的值）。

temp<- c("6702","1","67")
library(jsonlite)
baseurl <- "https://api.angel.co/1/startups/"
pages <- list()
for(i in 1:3){
  mydata<- fromJSON(paste0(baseurl,temp[[i]]),flatten= TRUE)
 pages[[i+1]] <- mydata
}
out<- rbind.pages(pages[sapply(pages, length)>2])

我收到以下错误。有关如何解决此问题的任何建议？感谢。

Error: Error in open.connection(con, "rb") : HTTP error 404.
Error: all(vapply(pages, is.data.frame, logical(1))) is not TRUE

Answer 1

rbind.pages似乎不喜欢＆＃34;空＆＃34;名单。您应该过滤列表以排除它们

out<- rbind.pages(pages[sapply(pages, length)>0])