plot2.R