Added plot3.r