Update Run_analysis.r