added run_analysis.R
updated run_analysis.R
updated