add plot.gts.R