Added initial files to submit

And added submit code to R_script file