R/get_available_metrics.R

Defines functions get_available_metrics

#' Get the metrics computed by the prediction model based on the task.
#' @noRd
get_available_metrics <- function(classification) {
  if (classification) {
    return(c(
      "Accuracy", "Kappa", "F1", "Sensitivity", "Specificity",
      "Pos_Pred_Value", "Neg_Pred_Value", "Precision",
      "Recall", "Detection_Rate", "Balanced_Accuracy"
    ))
  } else {
    return(c("RMSE", "MAE"))
  }
}

Try the RGCCA package in your browser

Any scripts or data that you put into this service are public.

RGCCA documentation built on May 29, 2024, 9:59 a.m.