groupVecNonVec
groupVec Extended Class Validation
Description
Checks whether all slots of an object are either not
vectors or have length <= 1 for use in validation checks.
Usage
groupVecNonVec(object, exceptSlots)
Arguments
| object |
the object whose slots are to be checked.
|
| exceptSlots |
if present, do not check these slots.
|
Details
The function loops through all the slots of the object, and for each
one checks to see that the data in it is either not a vector class,
or if it is a vector class, that it has length <= 1.
Value
returns TRUE if the slots in the object are atomic or are not vector objects (excluding
the slots in exceptSlots); otherwise, returns a descriptive string.
See Also
Examples
setClass("myclass", representation("groupVec", a = "numeric"))
obj <- new("myclass")
groupVecNonVec(obj)
obj@a <- 1:5
groupVecNonVec(obj)
groupVecNonVec(obj, "a")