Minor change plot1.R