Part 4: plot4.R and plot4.png added