Renaming R script to what is specified in the assignment