demo test for is.factor