adding readme file and updated R code with png files