Create run_analysis.r

I had trouble with git, but I want to make the file available.