# NOT RUN {
# To convert data frame to tidy data (long) format, run:
library(dplyr)
library(tidyr)
nfl_fandom_google_tidy <- nfl_fandom_google %>%
gather(sport, search_traffic, -c("dma", "trump_2016_vote")) %>%
arrange(dma)
# }
Run the code above in your browser using DataLab