Question

我正在尝试从lookupUsers生成的列表中生成数据帧。请考虑以下代码段

library(twitteR)
api_key <- "xx"
api_secret <- "xx"
access_token <- "xx"
access_token_secret <- "xx"
setup_twitter_oauth(api_key,api_secret,access_token,access_token_secret)

listofusers <- c("POTUS", "FBI", "StackExchange")
userlist <- lookupUsers(listofusers)

它正在生成3个对象的列表。如何将其转换为可用的数据框？

Answer 1

从lookupUsers函数的文档中可以看出，调用的输出是：＆＃39; 用户对象列表，按用户参数的顺序排序，带有名称是与相匹配的用户的特定元素。

如果您然后跳转到用户类的文档（仍然在twitteR包中），您可以看到此类的方法之一是toDataFrame方法。

因此，您可以简单地遍历列表，调用方法以获取重组的数据框：

to_df = lapply(userlist, function(tmp_user){
    tmp_user$toDataFrame()
})
to_df = dplyr::bind_rows(to_df)

twitteR：将lookupUser列表转换为单个数据帧

1 个答案: