adding plot R script and the png files