# new DTSg object
x <- DTSg$new(values = flow)
# merge with 'data.table'
## R6 method
x$merge(
y = flow,
suffixes = c("_1", "_2")
)$print()
## S3 method
print(merge(
x = x,
y = flow,
suffixes = c("_1", "_2")
))
Run the code above in your browser using DataLab