Update run_analysis.R

Clean code & add comments