Added plot1-3.r