update plot1.R, plot4.R with comment lines