Create plot3.R

R Code for plot3.R