Update run_analysis.r