R/check.R

In shinymodels: Interactive Assessments of Models

# check_predictions...
# if (!(".predictions" %in% colnames(x))) {
#   rlang::abort(
#     paste0(
#       "The `.predictions` column does not exist. ",
#       "Refit with the control argument `save_pred = TRUE` to save predictions."
#     )
#   )
# }
#
# check_colname
# if (!(y_name %in% names(original_data))) {
#   rlang::abort(glue::glue("'{y_name}' is not a column in the orignal data"))
# }