Update plot1.R

Expanding the comments slightly