myfirst r test file