Update plot1.R

adding comments