1

每当我尝试使用 Rfacebook 的 getPost 功能从 Facebook 获取包含大量评论的帖子时,我都会收到以下错误:

Error in while (n.l < n.likes & length(content$data) > 0 & !is.null(url <- content$paging$`next`)) { : 
  Argument has length 0

我尝试运行的代码如下所示:

post <- getPost(post = "Post-ID", token = token, n = 200)

我也尝试过使用函数的不同参数,但到目前为止没有任何效果......任何人都知道可能导致此错误的原因是什么?任何帮助是极大的赞赏!

这是 getPost 函数文档的链接:https ://www.rdocumentation.org/packages/Rfacebook/versions/0.6.15/topics/getPost

4

1 回答 1

0

我有一种方法可以从稍微不同的角度解决您的问题。

您可以从“页面”角度提取它,而不是处理帖子 ID,这也是获取帖子 ID 的更简单方法

第 1 步:查看帖子在哪个“页面”上,然后您可以提取“帖子”,但请确保使用时间参数 - 例如:“如果您想从具有大量评论的 Nike FB 页面中提取帖子- 发生在 2016 年 6 月 6 日”

nike_posts <- getPage("nike", token = fboauth, n=100000, since = '2016/06/05', until = '2016/06/07')

第 2 步:然后您将拥有一个帖子数据框 - 假设当时的示例 7 观察(他们可能一天发布多次)如果您要查找的帖子是观察 #3,则通过以下方式提取评论:

评论 <- getPost(nike_posts$id[3], token = fboauth, n = 10000, comments = TRUE, likes = FALSE, n.likes = 1, n.comments = 100000)

将此输出转换为 DataFrame

图书馆(plyr)

评论 <- ldply(评论,data.frame)

于 2018-02-12T08:28:49.947 回答