added plot3 png and R file