Added comments to plot1.R and completed plot 2