Create plot3.R

Code to produce plot3.R