plot1 Rscript