complete the run_analysis.R