Code I wrote in the R programming course from Coursera