plot1.R commit