add run_analysis.R

run_analysis.R is the complete script of performing the analysis.