1

有効なトークン URL が生成され、PIN を入力した後、ハンドシェイクによって次のエラーが返されます。

Error in cred$handshake() : Invalid response after authorization. You likely misentered your PIN, try rerunning this handshake & browser authorization to get a new PIN.

ピンのタイプミスがないことを 3 回確認しました。関数内にいくつかのプリントを入れると、oauthPOST() からの応答に「oauth_token_secret」が含まれていないことが示唆されますか?

再現するコードと私のシステム プロファイルは以下のとおりです。前もって感謝します。

library(twitteR);
library(tm);
library(wordcloud);
library(RColorBrewer);
library(ROAuth);
library(RCurl);
library(digest);

##consumer key
twit_consumer_key='XXXXXXXXXXXXXX';
##consumer secret
twit_consumer_secret='XXXXXXXXXXXXXXXXXX';
##request token URL
twit_request_url='https://api.twitter.com/oauth/request_token';
##access token URL
twit_access_url='https://api.twitter.com/oauth/access_token';
##authorize URL
twit_authorize_url='https://api.twitter.com/oauth/authorize';

cred <- OAuthFactory$new(consumerKey=twit_consumer_key,
                         consumerSecret=twit_consumer_secret,
                         requestURL=twit_request_url,
                         accessURL=twit_authorize_url,
                         authURL=twit_authorize_url);
cred$handshake();

そして、以下はセッション情報です:

> sessionInfo()
R version 2.15.3 (2013-03-01)
Platform: x86_64-pc-linux-gnu (64-bit)

locale:
 [1] LC_CTYPE=en_GB.UTF-8       LC_NUMERIC=C               LC_TIME=en_GB.UTF-8       
 [4] LC_COLLATE=en_GB.UTF-8     LC_MONETARY=en_GB.UTF-8    LC_MESSAGES=en_GB.UTF-8   
 [7] LC_PAPER=C                 LC_NAME=C                  LC_ADDRESS=C              
[10] LC_TELEPHONE=C             LC_MEASUREMENT=en_GB.UTF-8 LC_IDENTIFICATION=C       

attached base packages:
[1] stats     graphics  grDevices utils     datasets  methods   base     

other attached packages:
[1] digest_0.6.3       wordcloud_2.2      RColorBrewer_1.0-5 Rcpp_0.10.3        tm_0.5-8.3        
[6] twitteR_1.1.0      rjson_0.2.12       RCurl_1.95-4.1     bitops_1.0-5      

loaded via a namespace (and not attached):
[1] codetools_0.2-8 slam_0.1-28     tools_2.15.3
4

0 に答える 0