Added R script that performs the tasks of the Course Project