Create proj2plot2.R