update Plot1.R and Plot2.R