adding run_analysis.R 2