plot2.R was same as plot1.R, updated