Fix jarl complaints about capture.output(p<-ts$print())

Fix jarl complaints about capture.output(p<-ts$print()) #78