if (FALSE) {
# assign bearer token
token <- tcn_token(bearer = "xxxxxxxx")
# retrieve twitter app bearer token
token <- tcn_token(consumer_key = "xxxxxxxx",
consumer_secret = "xxxxxxxx")
}
Run the code above in your browser using DataLab