通过 rtweet 获取多个 Twitter 用户的关注者
Getting followers of multiple Twitter Users via rtweet
我正在使用 Michael W. Kearney 的 rtweet 包并尝试获取多个用户的关注者列表。到目前为止,如果我希望一次删除一个用户的关注者,而不管 he/she 可能拥有的关注者数量如何,它的效果非常好。
但是对于我的项目,我必须废弃 155 个配置文件,因此我想知道是否有一种功能或方法可以让我为所有用户编写一个命令?到目前为止,当我尝试使用多个用户时,我收到错误提示我一次只能使用一个用户。
EDIT:两个重要的信息 - 所需的输出是每个用户关注者的 155 列的数据集,我可以 export/write 作为 csv 或使用作为数据框。最后,在提出任何解决方案时,请记住,如果我使用 apply
系列的任何功能,我最终会得到列表(根据 Amar 的建议答案),但问题是将列表转换为 data.frame 并且由于列的长度不相等,我无法使用 as.data.frame()
函数。
有什么想法或解决方法吗?提前致谢。
使用 for
循环或 apply
来完成工作。创建该包是为了通过提供完成一项特定工作的功能(通常是 API 的镜像)来简化您与 twitter API 之间的交互。剩下的(比如你的要求)由R等包填写。
(I am following this tutorial here:)
假设您有一个要在向量中抓取的配置文件列表:
profiles <- c("Batman", "CatWomen", "Blade")
我们可以创建一个自定义函数来检索以下 3 profiles
:
getAllFollowers <- function(name) {
## how many total follows does cnn have?
cnn <- lookup_users(name)
## get them all (this would take a little over 5 days)
getAllFollowers <- function (name) {
user_info <- lookup_users(name)
user_follower <- get_followers(name, n=user_info$followers_count, retryonratelimit = T)
Sys.sleep(2) #sleep for 2 seconds
return(user_follower) }
然后我们可以使用 lapply
遍历 profiles
的列表并检索它们的以下内容:
out <- lapply(X = profiles, FUN = getAllFollowers)
这将创建一个 list
对象,(根据阅读)是:
A tibble data frame of follower IDs (one column named "user_id").
我正在使用 Michael W. Kearney 的 rtweet 包并尝试获取多个用户的关注者列表。到目前为止,如果我希望一次删除一个用户的关注者,而不管 he/she 可能拥有的关注者数量如何,它的效果非常好。
但是对于我的项目,我必须废弃 155 个配置文件,因此我想知道是否有一种功能或方法可以让我为所有用户编写一个命令?到目前为止,当我尝试使用多个用户时,我收到错误提示我一次只能使用一个用户。
EDIT:两个重要的信息 - 所需的输出是每个用户关注者的 155 列的数据集,我可以 export/write 作为 csv 或使用作为数据框。最后,在提出任何解决方案时,请记住,如果我使用 apply
系列的任何功能,我最终会得到列表(根据 Amar 的建议答案),但问题是将列表转换为 data.frame 并且由于列的长度不相等,我无法使用 as.data.frame()
函数。
有什么想法或解决方法吗?提前致谢。
使用 for
循环或 apply
来完成工作。创建该包是为了通过提供完成一项特定工作的功能(通常是 API 的镜像)来简化您与 twitter API 之间的交互。剩下的(比如你的要求)由R等包填写。
(I am following this tutorial here:)
假设您有一个要在向量中抓取的配置文件列表:
profiles <- c("Batman", "CatWomen", "Blade")
我们可以创建一个自定义函数来检索以下 3 profiles
:
getAllFollowers <- function(name) {
## how many total follows does cnn have?
cnn <- lookup_users(name)
## get them all (this would take a little over 5 days)
getAllFollowers <- function (name) {
user_info <- lookup_users(name)
user_follower <- get_followers(name, n=user_info$followers_count, retryonratelimit = T)
Sys.sleep(2) #sleep for 2 seconds
return(user_follower) }
然后我们可以使用 lapply
遍历 profiles
的列表并检索它们的以下内容:
out <- lapply(X = profiles, FUN = getAllFollowers)
这将创建一个 list
对象,(根据阅读)是:
A tibble data frame of follower IDs (one column named "user_id").