diff --git a/R/auditClassicalModelFairness.R b/R/auditClassicalModelFairness.R index c6177d61..9f909f7f 100644 --- a/R/auditClassicalModelFairness.R +++ b/R/auditClassicalModelFairness.R @@ -22,9 +22,6 @@ auditClassicalModelFairness <- function(jaspResults, dataset, options, ...) { # Create the procedure paragraph .jfaFairnessAddProcedure(options, jaspResults, position = 1) - # Read in the data - dataset <- .jfaFairnessReadData(dataset, options) - # Ready for analysis ready <- (options[["protected"]] != "" && options[["target"]] != "" && options[["predictions"]] != "" && options[["privileged"]] != "" && options[["positive"]] != "") @@ -121,24 +118,6 @@ auditClassicalModelFairness <- function(jaspResults, dataset, options, ...) { return(out) } -.jfaFairnessReadData <- function(dataset, options) { - if (!is.null(dataset)) { - return(dataset) - } else { - vars <- NULL - if (options[["target"]] != "") { - vars <- c(vars, options[["target"]]) - } - if (options[["predictions"]] != "") { - vars <- c(vars, options[["predictions"]]) - } - if (options[["protected"]] != "") { - vars <- c(vars, options[["protected"]]) - } - return(dataset) - } -} - .jfaFairnessAddProcedure <- function(options, jaspResults, position) { if (options[["explanatoryText"]] && is.null(jaspResults[["procedureContainer"]])) { procedureContainer <- createJaspContainer(title = gettext("Procedure")) diff --git a/inst/Description.qml b/inst/Description.qml index 42523c83..87109991 100644 --- a/inst/Description.qml +++ b/inst/Description.qml @@ -96,8 +96,8 @@ Description // } // Analysis // { - // title: qsTr("Fairness Metrics") - // func: "auditClassicalModelFairness" + // title: qsTr("Fairness Metrics") + // func: "auditClassicalModelFairness" // preloadData: true // } }