OAuth Pin возвращает [1]

Question

Я пользуюсь Твиттером около месяца, используя следующую библиотеку кодов (RCurl), библиотеку (twitteR), библиотеку (streamR) (ROAuth)

requestURL<-"https://api.twitter.com/oauth/request_token"
accessURL <- "https://api.twitter.com/oauth/access_token"
authURL ="https://api.twitter.com/oauth/authorize"
consumerkey= "my key"
consumersecret = "my secret"
cred <-OAuthFactory$new(consumerKey=consumerkey,consumerSecret=consumersecret,requestURL=requestURL,accessURL=accessURL,authURL=authURL)
cred$handshake (cainfo=system.file("CurlSSL","cacert.pem",package ="RCurl"))

Обычно это работает, но иногда я перехожу по гиперссылке на вывод, вставляю вывод и получаю [1] взамен. Независимо от того, что я пишу, я просто продолжаю получать [1]. Затем, когда я пытаюсь отправить запрос, мне говорят, что он требует OAuth (ниже). Что я делаю неправильно? Большое спасибо за любую помощь!

Error in twInterfaceObj$doAPICall(cmd, params, "GET", ...) : 
OAuth authentication is required with Twitter's API v1.1

Answer 1

Если вам нужно делать это каждый раз, когда вы хотите получать данные Twitter с помощью пакета streamR с R. В вашем коде просто добавьте следующее:

save(credentials, file="credentials.RData")

Это сохранит ваши учетные данные в файле с именем credentials.RData. Тогда единственное, что вы должны делать каждый раз, когда вам нужны новые данные Twitter, - это загружать файл, выполняя следующие действия:

library(twitteR)
load("credentials.RData")
registerTwitterOAuth(credentials)

Надеюсь, поможет!