Enhancement to plot1.R file

Enhancement to plot1.R file