plot4.R - R Code to generate plot4.png