Update plot1.R

Update plot1.R