empty plot1.R