Updated plot4.R to change the y label in first plot