Create run_analysis.r

initial commit