Uploaded run_analysis.R with comments