从twitter获取数据在r

问题描述：

你能帮我从twitter获取数据吗？研究了很多不能解决这个问题。从twitter获取数据在r

library(twitteR) 
library(ROAuth) 
library(RCurl) 
library(pacman) 
library(devtools) 
library(rjson) 
library(httr) 

    consumerKey="xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" 
    consumerSecret="xxxxxxxxxxxxxxxxxxxxxxxxxxxx" 
    access_token <- "xxxxxxxxxxxxxxxxxxxxxxxxxxxx" 
    access_secret <- "Xxxxxxxxxxxxxxxxxxxxxxxxxxx" 



if (!require('pacman')) install.packages('pacman') 
pacman::p_load(twitteR, ROAuth, RCurl) 

options(RCurlOptions = list(cainfo = system.file('CurlSSL', 'cacert.pem', package = 'RCurl'))) 

reqURL = 'https://api.twitter.com/oauth/request_token' 
accessURL = 'https://api.twitter.com/oauth/access_token' 
authURL = 'https://api.twitter.com/oauth/authorize' 

twitCred = OAuthFactory$new(consumerKey = consumerKey, consumerSecret = consumerSecret, requestURL = reqURL, accessURL = accessURL, authURL = authURL) 
twitCred$handshake(cainfo = system.file('CurlSSL', 'cacert.pem', package = 'RCurl'))

它指引我授权和代码，然后按I键进入

下一步

setup_twitter_oauth(access_token,access_secret)

我得到这个错误。如何解决这个问题。

[1] “使用基于浏览器的认证”

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

答

你已经设定了在Twitter（https://apps.twitter.com/）的应用程序？这是我得到了它的工作，你做的授权有这给相关按键，然后与Twitter这是因为

setup_twitter_oauth(consumer_key = consumer_key, 
       consumer_secret = consumer_secret, 
       access_token = access_token, 
       access_secret = access_secret)

由于操作简单，然后检索时间表：

userTimeline(user = "@BBCBreaking")

我已经安装了应用程序已经发布，但我认为我能够生成一些推文。谢谢！！ – Ashish

从twitter获取数据在r

相关推荐