commit completed plot1.R