Create run_analysis.R

This file performs the actual analysis and cleaning up of data