modded plot2.R