PLOT1.R