updates to run_analysis.R and result of final run