A wrapper to add to the class attribute.
addClasses(x, classes)
x
[any] Your object.
classes
[character] Classes to add. Will be added in front (specialization).
character
Changed object x.
addClasses(list(), c("foo1", "foo2"))