Test for R present

Test Run