Update plot2.R

cleanup after merge