Updated plot3.R