Create plot3.R

Code for plot3 of assignment 1