## A real example, but using a fictitious consumerkey and consumer
## secret - you'll need to supply your own
requestURL <- "https://api.twitter.com/oauth/request_token"
accessURL = "http://api.twitter.com/oauth/access_token"
authURL = "http://api.twitter.com/oauth/authorize"
consumerKey = "FAKEDATA"
consumerSecret = "FAKEDATA"
twitCred <- OAuthFactory$new(consumerKey=consumerKey,
consumerSecret=consumerSecret,
requestURL=reqURL,
accessURL=accessURL,
authURL=authURL)
twitCred$handshake()
registerTWitterOAuth(twitCred)Run the code above in your browser using DataLab