# NOT RUN {
bearer_token <- "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX"
get_all_tweets(query = "BLM",
start_tweets = "2020-01-01T00:00:00Z",
end_tweets = "2020-01-05T00:00:00Z",
bearer_token = get_bearer(),
data_path = "data",
n = 500)
get_all_tweets(users = c("cbarrie", "jack"),
start_tweets = "2021-01-01T00:00:00Z",
end_tweets = "2021-06-01T00:00:00Z",
bearer_token = get_bearer(),
n = 1000)
get_all_tweets(start_tweets = "2021-01-01T00:00:00Z",
end_tweets = "2021-06-01T00:00:00Z",
bearer_token = get_bearer(),
n = 1500,
conversation_id = "1392887366507970561")
# }
Run the code above in your browser using DataLab