run_analysis.R script for Week 3 Course Project of Data Science