Addition of plot3 and its R file