S7_class() returns a class specification for any R object, in a form
that can be passed to method() or used in any S7 dispatch context.
For S7 objects, the S7 class.
For S3 objects, a
new_S3_class()wrappingclass(x).For S4 objects, the S4 class.
For base types, the matching
class_*(e.g. class_integer).For missing arguments, returns class_missing.
Examples
Foo := new_class()
S7_class(Foo())
#> <Foo> class
#> @ parent : <S7_object>
#> @ constructor: function() {...}
#> @ validator : <NULL>
#> @ properties :
# Also works on non-S7 objects
S7_class(1L)
#> <S7_base_class>: <integer>
S7_class("x")
#> <S7_base_class>: <character>
S7_class(mean)
#> <S7_base_class>: <function>
S7_class(factor("a"))
#> <S7_S3_class>: S3<factor>