Fixed typos and created plot4.R and plot4.png