Added R code to create plots
First commit