pic for plot2.R