# NOT RUN {
# twitter authentication via user authorization of app on their account
# will open a web browser to twitter prompting the user to log in and authorize the app
# apiKey and apiSecret are equivalent to a twitter apps consumer key and secret
twitterAuth <- Authenticate("twitter", appName = "An App",
apiKey = "xxxxxxxxxxxx", apiSecret = "xxxxxxxxxxxx"
)
# twitter authentication with developer app api keys
myDevKeys <- list(appName = "My App", apiKey = "xxxxxxxxxxxx",
apiSecret = "xxxxxxxxxxxx", accessToken = "xxxxxxxxxxxx",
accessTokenSecret = "xxxxxxxxxxxx")
twitterAuth <- Authenticate("twitter", appName = myDevKeys$appName,
apiKey = myDevKeys$apiKey, apiSecret = myDevKeys$apiSecret, accessToken = myDevKeys$accessToken,
accessTokenSecret = myDevKeys$accessTokenSecret)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab