add plot1.R file