pic for plot3.R