Update plot1.R and figure/plot1.png