Change gameday title in R script