R で Twitter のストリーミング API に接続しようとしています。私のコード (偽のコンシューマー キーとシークレットを含む) は次のとおりです。
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"))
このコードを入力すると、次のメッセージが表示されます (ただし、Web アドレスは変更されています)。
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 を取得する方法) に関するアイデアは大歓迎です!