Add Plot2.R