Corrected some comments in each file, removed unnecessary parts of lwd
vector in legend (plot3.R, plot4.R)