Plot1.R updated code
plot1.png from updated code