updates to plot1.R, new png file