Addint R scripts and plot PNGs to the repo