plot.chosen_metric | R Documentation |
Choose metric from parity loss metrics and plot it for every model. The one with the least parity loss is more fair in terms of this particular metric.
## S3 method for class 'chosen_metric' plot(x, ...)
x |
object of class |
... |
other objects of class |
ggplot2
object
data("german") y_numeric <- as.numeric(german$Risk) - 1 lm_model <- glm(Risk ~ ., data = german, family = binomial(link = "logit") ) explainer_lm <- DALEX::explain(lm_model, data = german[, -1], y = y_numeric) fobject <- fairness_check(explainer_lm, protected = german$Sex, privileged = "male" ) cm <- choose_metric(fobject, "TPR") plot(cm) rf_model <- ranger::ranger(Risk ~ ., data = german, probability = TRUE, num.trees = 200 ) explainer_rf <- DALEX::explain(rf_model, data = german[, -1], y = y_numeric) fobject <- fairness_check(explainer_rf, fobject) cm <- choose_metric(fobject, "TPR") plot(cm)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.