Upload run_analysis.R script

This script is the file I used to run the project with.
see README.md