powered by
Symbolic modal
is.sym.modal(x)
returns TRUE if its argument's value is a symbolic_modal and FALSE otherwise.
an object to be tested
x <- sym.modal(factor(c("a", "b", "b", "l"))) is.sym.modal(x)
Run the code above in your browser using DataLab