Question

我尝试使用R连接到Facebook。我尝试使用

中的代码

https://github.com/datamgmt/facebook-data-mining

使用以下代码获取用户信息：

access.token<- "AAACE________n6bcITRIMCZCKhMySOV" #my access token
FacebookFetch <- function(access.path = "me", access.token, access.options) {
      if (missing(access.options)) {
        access.options <- ""
      }
      else {
        access.options <- sprintf("?%s", paste(names(access.options), "=", 
                                               unlist(access.options), collapse = "&", sep = ""))
      }
      data <- getURL(sprintf("https://graph.facebook.com/%s%s&access_token=%s", 
                             access.path, access.options, access.token),cainfo="cacert.pem")
      fromJSON(data)
    }

individual.id <- "100__72"  # my ID

individual <- FacebookFetch(access.path=paste(individual.id),access.token=access.token )
if (length(individual$id)) {
  cat ("Working with individual: ",individual$name," (",individual$id,")\n", sep="")
} else{
  cat("Message: ", unlist(individual)[1], "\n")
  cat("Type:    ", unlist(individual)[2], "\n")
  cat("Code:    ", unlist(individual)[3], "\n")
  stop("   Cannot continue")
}

where cainfo="cacert.pem" is added to work around the SSL certificate verification error.

虽然现在我收到以下错误，但我不知道如何解决这个问题。

Message:  (#803) Some of the aliases you requested do not exist: 100__72&access_token=AAACE________n6bcITRIMCZCKhMySOV 
Type:     OAuthException 
Code:     803

我找到了一些人们遇到同样问题的帖子，只是没有使用R而是使用其他程序，这个问题是通过制作令牌和id来修复的。然而，在R中，这些已经是阶级性的。

当我在浏览器中重新创建url时，它会返回相同的错误，而graph explorer会返回所有正确的信息。我曾尝试多次刷新令牌，但这不起作用。 API参考手册没有说明803所包含的错误代码。

有人知道如何解决这个问题吗？我在Windows 7专业版的Rstudio中使用r 2.15.2（也在windows vista上试过）

R中的facebook api：OAuthException错误，代码803

0 个答案: