Plot3.R updated and plot3
Plot4.R updated and plot4