Adding some more R and Incanter to compare both