Add Total Tweet Count per User to twitter dataset, user aggregation level

tweet_count.R

add_tweet_count <- function(dat) {
  return(
    dat %>%
      group_by(user_id) %>%
      mutate(
        tweet_count = n()
      ) %>%
      ungroup() # to remove grouped_df class
  )
}