Update plot3.r