plot1 png
plot1 R code