run_analysis.R completed