Update run_analysis_5.R