使用R和json“尝试选择少于一个元素”

我使用软件包smappR来获取和分析twitter。在此循环中使用函数getTimeline时：

#import excel-file with twitter usernames    
riksdagsledamoter <- read.xlsx("lista_riksdagsledamoter_twitter.xlsx", sheetIndex=1) 

# delete MPs with out twitter account  
twitterusers <- riksdagsledamoter[!(is.na(riksdagsledamoter$twitterusername)), ] 
row.names(twitterusers) <- seq(nrow(twitterusers)) 
names(twitterusers) <- c("twitterusername", "name", "parti") #convertering to vector
twitterusersvector <- as.vector(twitterusers$twitterusername)

    for(i in 1:length(twitterusersvector)){
      user <- twitterusersvector[i]
      # user <- twitterusers$twitterusername[i]
      # rov <- as.vector(user)
      getTimeline(screen_name = user,
                  filename = "pa324.json", # where tweets will be stored
                  n=3200, ## number of tweets to download (max is 3,200)
                  oauth_folder = "~/Dropbox/Privat/R/credentials",
                  sleep=10, )
      if ( file.info("pa324.json")$size > 120000000 ){
      tweetsToMongo(file.name="pa324.json", ns="xxxx.yyyy",
                    host="192.168.x.x", username="", password="")
      file.remove("pa324.json")
      }
    }

我在谷歌上搜索过，并尝试过：

row.names(twitterusers) <- seq(nrow(twitterusers)) 

---

没有帮助。可能有什么问题？

试着发布一个。原因是在这行getTraceback中：解决问题的max\u id！非常感谢你！

row.names(twitterusers) <- seq(nrow(twitterusers))