Description Usage Arguments Details Value See Also Examples
Auto-generates S4 generics from an R6 Class.
1 2 3 4 5 6 7 8 9 | R62S4(
R6Class,
dispatchClasses = list(R6Class),
assignEnvir = parent.env(environment()),
mask = FALSE,
scope = "public",
arg1 = "object",
exclude = NULL
)
|
R6Class |
R6ClassGenerator to generate public methods from |
dispatchClasses |
list of classes to assign dispatch methods on |
assignEnvir |
environment in which to assign the generics/methods, default is parent of current environment. |
mask |
logical, determines if non-generic functions should be masked if found, see details. |
scope |
determines the scope of methods that should be copied, either |
arg1 |
if |
exclude |
an optional character vector naming the public methods or active bindings to exclude from the generator |
If scope == "public"
then searches in a given R6::R6Class for all public methods that are not initialize
or clone
.
If scope == "active"
then searches for all active bindings. Currently there is only support for
calling active bindings but not setting them. If scope == c("public", active")
then both are included.
Any methods/bindings passed to exclude
will be ignored in the search.
If mask == TRUE
then the generator ignores if a generic or method of the same name exists and will
create a new S4 generic/method. If
mask == FALSE
then the generator will create a new generic only if an existing generic does not
already exist. Methods and generics are created using standard convention.
The optional dispatchClasses
argument takes a list of R6::R6Classes and allows methods to be
created for multiple classes at one time.
S4 generics are detected with methods::.S4methods()
.
Assigns generics/methods/functions to the chosen environment.
Assigns methods and generics to the chosen environment.
methods::setMethod methods::setGeneric
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 | printMachine <- R6::R6Class("printMachine",
public = list(initialize = function() {},
printer = function(str) print(str)),
active = list(Status = function() "Printing"))
pm <- printMachine$new()
# scope = public
R62S4(printMachine, assignEnvir = topenv())
printer(pm, "Test String B")
# scope = active
R62S4(printMachine, assignEnvir = topenv(), scope = 'active')
# note support for accessing only, cannot assign
# values to an active binding
Status(pm)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.