adding 4 png plots and the R-scripts for generating them