Added R code files and plots in figure folder