Submit script run_analysis.R for Programming Assigment Getting and Cleaning Data