Plot 4

Adding R script and png file for Plot 4