Update run_analysis.R

Including the descriptive comments and maintaining the code.