Update plot1.R

Added vital comment