added additional comment to plot1.R