Adding run_analysis.r file