Updated run_Analysis.r