Create plot3.R

initial commit with final solution