Plot 1

Adding R script and PNG files for Plot 1