R : Twitter OAuth for R

Twitter OAuth 정책이 바뀌었다나 어쨌다나 Twitter에 대한 기능들을 쓰려면 OAuth를 받아야 한단다.

1. https://dev.twitter.com/apps/new 에서 새로운 App으로 등록

2. OAuth 관련된 정보들을 생성할 수 있는데 이를 이용해서 아래의 스크립트를 실행한다.

     library(twitteR)

     cainfo <- system.file("CurlSSL", "cacert.pem", package = "RCurl")

     cred <- OAuthFactory$new(consumerKey="Consumerkey를 입력한다.",

                              consumerSecret="ConsumerSecret을 입력한다.",

                              requestURL="https://api.twitter.com/oauth/request_token",

                              accessURL="http://api.twitter.com/oauth/access_token",

                              authURL="http://api.twitter.com/oauth/authorize")

     cred$handshake(cainfo=cainfo)

3. 마지막 스크립트 까지 실행하면 주소가 하나뜨는데 해당 주소라가서 나오는 숫자를 입력한다.

4. 마지막으로 아래 스크립트 실행

     registerTwitterOAuth(cred)

5. 그러면 트위터에 접근이 가능하다.

--------------------------------------------------------

그런데 매번 해당 주소로 가서 숫자를 받아서 OAuth를 받아야 하는지.. 불편하구만...