run_analysis.R - final summary