# new DTSg object
x <- DTSg$new(values = flow[1:500, ])
# combine rows
## R6 method
x$rowbind(
list(flow[1001:1500, ], DTSg$new(values = flow[501:1000, ])),
flow[1501:.N, ]
)$print()
## 'rbind()' is a "hidden" R6 alias for 'rowbind()'
x$rbind(
list(flow[1001:1500, ], DTSg$new(values = flow[501:1000, ])),
flow[1501:.N, ]
)$print()
## S3 method
print(rowbind(
x = x,
list(flow[1001:1500, ], DTSg$new(values = flow[501:1000, ])),
flow[1501:.N, ]
))
Run the code above in your browser using DataLab