Use specific rtweet token / use token with RScript

specific_rtweet_token.R

# rtweet tries to automatically detect a token for the Twitter API
# This fails when you run the script from the command line with RScript
# If you have multiple tokens, this script also helps selecting the right token
# Code inspired by https://github.com/samzipper/SkeeterStream/blob/master/TestLookupUsers.R

# Requirements:
# You need to have set up a token with rtweet
# More info: https://rtweet.info/articles/auth.html

# Assumption token is stored at /home/username/

library(rtweet)

# read in token which was already created
rtoken <- readRDS(file.path(path.expand("~/"),
  ".rtweet_token.rds"))

# search twitter!
tweets <- search_tweets("@BarackObama",
                         n = 25, 
                         type = "recent",
                         include_rts = FALSE,
                         retryOnRateLimit = TRUE,
                         token = rtoken)