# NOT RUN {
# twitter authentication with api keys
myKeys <- list(appName = "vosonSML", apiKey = "xxxxxxxxxxxx",
apiSecret = "xxxxxxxxxxxx", accessToken = "xxxxxxxxxxxx",
accessTokenSecret = "xxxxxxxxxxxx")
twitterAuth <- Authenticate("twitter", appName = myKeys$appName,
apiKey = myKeys$apiKey, apiSecret = myKeys$apiSecret, accessToken = myKeys$accessToken,
accessTokenSecret = myKeys$accessTokenSecret, useCachedToken = TRUE)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab