Update Run_analysis.R