The classes are not exported under their own names (the package's surface
is its functions), so these return them. Needed to build a subclass
(S7::new_class(..., parent = scale_class()), which is what
scale_alias_property() is for) or to register an S7 method against one.
To merely ask what an object is, use scale_is().
scale_class()
scale_product_class()The S7 class object.
scale_class()
#> <nestedscales::NestedScale> class
#> @ parent : <S7_object>
#> @ constructor: function(leaftable, frames, members, key, meta) {...}
#> @ validator : function(self) {...}
#> @ properties :
#> $ leaftable: S3<data.frame>
#> $ frames : <character>
#> $ members : <list>
#> $ key : <character>
#> $ meta : <list>
S7::S7_inherits(scale_example(), scale_class())
#> [1] TRUE