Update plot1.R

additional comments