plot 4

plot4.R and plot4.png