data(vi_smol, vi_predictors, package = "spatialData")
vi_predictors_numeric <- identify_numeric_variables(
df = vi_smol,
predictors = vi_predictors
)$valid
df <- validate_arg_df(
df = vi_smol,
responses = "vi_numeric",
predictors = vi_predictors_numeric,
quiet = FALSE
)
attributes(vi)$validated
Run the code above in your browser using DataLab