Update Plot_1.R