Added file plot.R