Update plot3.R

edit comments