在R中的函数内部列表中追加数据框

Question

我有一个函数，我要从某个范围（例如1-500）的方法中寻找数据帧，但不能要求该函数一次给出所有值。 因此，我尝试创建一个函数以从每个100的块中迭代值。

relationstatus <- function(n){
  mylist <- list()
  for(x in seq(1,n,100)) {
    y = x+99
      if(y > n){
        y = n
      }
    myFriends_info <- getUsers(myFriends$id[x:y], token=access_token, private_info=TRUE)
    #store the above myFriends_info in the list in each iteration
    append(mylist,myFriends_info)
    head(myFriends_info)
  } 
  return(mylist)
}

Input - 500
Output - list containing  data frames(myFriends_info data frames)

因此，对于500个输入，我将期望包含5个数据帧的列表

最后，我期望所有这些数据帧都在列表中，然后该函数返回该列表，但是我希望该函数能够像Java之类的普通技术一样工作，但是我无法解决它。 解决它的任何更好方法或我在哪里做错了，因为我的列表返回null

Answer 1

很简单，我只需要重新整理清单，

relationstatus <- function(n){
  mylist <- list()
  j = 1
  for(x in seq(1,n,100)) {
    y = x+99
      if(y > n){
        y = n
      }
    myFriends_info <- getUsers(myFriends$id[x:y], token=access_token, private_info=TRUE)
    sEOG <- paste("", j, sep="")
    mylist[[sEOG]] <-myFriends_info
    j = j+ 1
  } 
  return(mylist)
}