我收集了原始的推文(不是转推)数据集,但至少转发了一次。对于这6,000个原始推文的数据集,我正尝试使用“ rtweet”包中的get_retweets函数为每个推文收集30条推文。根据过去的经验,如果原始推文至少未转发过30次,则无论原始推文有多少次转发,它都只会返回。
get_retweets(status_id, n = 100, parse = TRUE, token = NULL, ...)
我的代码行如下所示:
> for (i in seq(nrow(morethan1RT))) {
if (i == 1) {
my_retweets = data.frame(get_retweets(morethan1RT$status_id[i], n = 1))
}
else {
my_retweets = rbind(my_retweets, get_retweets(morethan1RT$status_id[i], n = 1))
}
}
我首先通过使用第一个原始推文的状态ID提取0来创建一个数据框(存储所有转发)
此for循环最初起作用,但现在在运行整个循环后,我仅获得约900条转发(甚至不到100条)。我不确定发生了什么问题-由于Twitter限制了每15分钟可以收集多少条推文,因此我尝试等待更长的时间来运行循环;将6,000条推文分成小批;正在重启r ...他们都没有工作。
如果有人能指出我正确的方向,我将不胜感激。谢谢!
答案 0 :(得分:0)
rtweet 文档说到 get_retweets :“返回给定状态的100个最新转发的集合。注意:Twitter的API当前仅限于100个或更少的转发者。”