## Not run:
# library(httr)
# library(twitteR)
# token <- Token2.0$new(
# params = list(as_header=TRUE),
# app = oauth_app("fun.with.twitter", "no.key", "no.secret"),
# endpoint = oauth_endpoints("twitter"),
# credentials = list(access_token = "AAAAAAAAAAAAAAAAAAA%3DAAAAAAAAAAAAAA"),
# cache = FALSE
# )
#
# use_oauth_token(token)
# ## End(Not run)
Run the code above in your browser using DataLab