Create a plot3.R file