Create testRscript.r