Create Rstarting.2.R