次のスクリプトを使用してROAuth経由で認証しようとしています:
library("ROAuth")
library("RCurl")
requestURL <- "https://api.twitter.com/oauth/request_token"
accessURL = "https://api.twitter.com/oauth/access_token"
authURL = "https://api.twitter.com/oauth/authorize"
cKey<- "Key"
cSecret<- "Secret"
Cred <- OAuthFactory$new(consumerKey=cKey,
consumerSecret=cSecret,
requestURL=requestURL,
accessURL=accessURL,
authURL=authURL)
Cred$handshake(cainfo = system.file("CurlSSL", "cacert.pem", package = "RCurl"))
このコードを入力するたびに、次のエラーが表示されます。
Error in Cred$handshake(cainfo = system.file("CurlSSL", "cacert.pem", : Invalid response from site, please check your consumerKey and consumerSecret and try again.
何が間違っているのかわかりません。ROauth と RCurl を再インストールし、それらのバージョン情報 (ROAuth 0.9.1 と RCurl_1.91-1.1(?) ) を確認して、必要なすべてのパッケージが最新であることを確認しました。インストール後、R を再起動しました (別の投稿で提案された可能な解決策として)。コンシューマ キーとコンシューマ シークレットをコピーして貼り付けて再確認しましたが、それらは正しいと確信しています。他のアイデアはありますか?
ありがとうございました。