rxAddInheritance: Add Inheritance to Compatible Objects
Description
Add a specific S3 class to the "class" of a compatible object.
Usage
rxAddInheritance(x, inheritanceClass, ...)
## S3 method for class `rxDTree':
rxAddInheritance (x, inheritanceClass = "rpart", ... )
Arguments
x
the object to which inheritance is to be added. Specifically, for rxAddInheritance.rxDTree, an object of class rxDTree.
inheritanceClass
the class to be inherited from. Specifically, for rxAddInheritance.rxDTree, the class "rpart".
...
additional arguments to be passed directly to other methods.
Details
The rxAddInheritance function is designed to be a general way to add inheritance to S3 objects that are compatible
with the class for which inheritance is to be added. Note, however, that this approach is exactly as dangerous and error-prone
as simply calling class(x) <- c(class(x), inheritanceClass).
It is expected that classes that are designed to mimic existing R classes, but not rely on them, will have their own
specific rxAddInheritance methods to add the R class inheritance on request.
In the case of rxDTree objects, these were designed to be compatible with the "rpart" class. so adding rpart
inheritance is guaranteed to work.
Value
The original object, modified to include inheritanceClass as part of its "class" attribute.
In the case of rxDTree objects, the object may also be modified to include the functions component if it was
previously NULL.
Author(s)
Microsoft Corporation Microsoft Technical Support
See Also
Examples
mtcarTree <- rxDTree(mpg ~ disp, data=mtcars)
mtcarRpart <- rxAddInheritance(mtcarTree)
require(rpart)
printcp(mtcarRpart)