Adding run_analysis.R R file