Update plot3.R

Added some comments