Update run_analysis2.R