Update proj2plot1.R