adding four png and four R code files