added plot and updated plot1.R file