Update Rfile.R

Commit A2