Update plot3.R

updated header text