Create plot3.R

added script to generate plot3.png