Create run_analysis.R

Run_Analysis for Peer Assignment on Cleaning Data Class