Create run_analysis.R

the file required for submission