diff --git a/R/check_outliers.R b/R/check_outliers.R index 3ea506eec..0e68d1b18 100644 --- a/R/check_outliers.R +++ b/R/check_outliers.R @@ -903,6 +903,7 @@ check_outliers.data.frame <- function(x, valid <- method if("optics" %in% valid) { valid <- c(valid, "optics_xi") + method <- c(method, "optics_xi") } thresholds <- thresholds[names(thresholds) %in% valid]