Freq_2015 <- dataset_2015 %>% group_by(year, fandango = Fandango_Stars)%>% summarize(Freq = n())
Freq_2015 <- dataset_2015 %>%
group_by(year, fandango = Fandango_Stars)%>%
summarize(Freq = n())