Plot2

and fix a bug in plot1 R file