Update plot1.R

change data url