使用twitteR软件包抓取推文时出现未经授权的错误

Question

我尝试使用twittR软件包抓取推文，并收到以下错误：

根据输出，我尝试了这里概述的所有内容：TwitteR setup_twitter_oauth() failing。 但是，非工作（包括：devtools :: install_github（＆＃34; jrowen / twitteR＆＃34;，ref =＆＃34; oauth_httr_1_0＆＃34;））

当我尝试这个替代方案时，我得到：

packages <- c("twitteR", "openssl")
### checking if packages are already installed and installing if not
for(i in packages){
  if(!(i %in% installed.packages()[, "Package"])){
    install.packages(i)
  }
library(i, character.only = TRUE) ## load packages
}

然后运行：

setup_twitter_oauth(consumer_key, consumer_secret)

我收到以下错误：

Error in init_oauth1.0(self$endpoint, self$app, permission =  self$params$permission,  : 
Unauthorized (HTTP 401).

我认为这与根本原因有关。关于我可以摆脱这个问题的任何想法？