%+%.bandicoot_oop | R Documentation |
bandicoot_oop
objectThis function performs the addition operator using the
..add..()
method.
If it is not applicable, error will be raised.
## S3 method for class 'bandicoot_oop'
x %+% y
x |
|
y |
Another object. |
Depends on the method.
COMPANY <- new_class(class_name = "COMPANY")
company <- COMPANY$instantiate
register_method(COMPANY,
..init.. = function(name, age) {
self$name <- name
self$age <- age
})
register_method(COMPANY,
..add.. = function(y) {
company(c(self$name, y$name),
c(self$age, y$age))
})
good_company <- company(c("patrick", "james"),
c(33, 34))
bad_company <- company(c("pat", "jam"),
c(3, 4))
new_company <- good_company %+% bad_company
new_company$name
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.