# \donttest{
my.ts.bin.trt.oc.df <- get.ts.bin.trt.oc.df()
my.ts.bin.trt.oc2 <- make.ts.bin.trt.oc2(for.plot=my.ts.bin.trt.oc.df, add.table=TRUE)
plot(my.ts.bin.trt.oc2[[1]])
my.ts.bin.trt.oc2[[2]]
my.ts.bin.trt.oc2[[3]]
# }
Run the code above in your browser using DataLab