changes to plot4.png and plot4.R