Final

R code, plots and README