Update run_analysis.R

Project is finished