Update run_analysis.R

Finished the 1st, 2nd, 3rd steps.