Assignment 3

# # install.packages("rtweet")
# library(rtweet)
# library(tidyverse)
# # auth_setup_default()
# 
# jbtime = get_timelines("JoeBiden", n = 500)
# 
# slice_max(jbtime, order_by = favorite_count) %>% 
#   select(full_text)
# 
# slice_max(jbtime, order_by = retweet_count) %>% 
#   select(full_text)