created an R presentation