plot4.R - R code to generate plot4.png