create plot3.R

plot3.r produces plot3.png