Я пытаюсь подключиться к потоковому API Twitter в R. Мой код (включая поддельный потребительский ключ и секрет) выглядит следующим образом:
library(streamR)
library(ROAuth)
requestURL <- "https://api.twitter.com/oauth/request_token"
accessURL <- "http://api.twitter.com/oauth/access_token"
authURL <- "http://api.twitter.com/oauth/authorize"
consumerKey <- "xxxxxxxyyyyyyyyzzzzzzzz"
consumerSecret <- "xxxxxxxyyyyyyyyzzzzzzzz123123123123123"
my_oauth <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret, requestURL=requestURL,
accessURL=accessURL, authURL=authURL)
my_oauth$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))
Когда я ввожу этот код, я получаю следующее сообщение (хотя я изменил веб-адрес):
To enable the connection, please direct your web browser to:
http://api.twitter.com/oauth/authorize?oauth_token=xxxxxxxyyyyyyyyzzzzzzzz
When complete, record the PIN given to you and provide it here:
Следующее, что я вижу, это следующий экран в моем браузере:
Я выбираю «Авторизовать приложение», и меня покидает api.twitter.com. Я никогда не вижу PIN-код, который мне нужен для продвижения вперед.
Приветствуются любые идеи относительно того, как решить эту проблему (и получить PIN-код, который мне нужен для включения соединения, которое я пытаюсь создать)!