print.ceteris_paribus_cutoff | R Documentation |
Print ceteris paribus cutoff
## S3 method for class 'ceteris_paribus_cutoff' print(x, ...)
x |
|
... |
other print parameters |
data("german") german <- german[1:500, ] y_numeric <- as.numeric(german$Risk) - 1 lm_model <- glm(Risk ~ ., data = german, family = binomial(link = "logit") ) rf_model <- ranger::ranger(Risk ~ ., data = german, probability = TRUE, num.trees = 200, num.threads = 1 ) explainer_lm <- DALEX::explain(lm_model, data = german[, -1], y = y_numeric) explainer_rf <- DALEX::explain(rf_model, data = german[, -1], y = y_numeric) fobject <- fairness_check(explainer_lm, explainer_rf, protected = german$Sex, privileged = "male" ) ceteris_paribus_cutoff(fobject, "female")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.