Minor edit to plot1.R