Adding plots and R code to generate plots