plot3 png
plot3 R code