plot1, 2, 3 and 4 R script and png file added

plot1, 2, 3 and 4 R script and png file added