Updating plot1.R and plot2.R