new plot2.R