Create plot4.PNG from modified plot4.R