upload plot.R