data(vi_smol, vi_predictors)
#create an invalid categorical
vi_smol$invalid_categorical <- "a"
x <- identify_categorical_variables(
df = vi_smol,
responses = "vi_categorical",
predictors = vi_predictors
)
x$valid
x$invalid
Run the code above in your browser using DataLab