Adding the actual run_analysis.R script.