Finished run_analysis.R

Finished and debugged run_analysis.R