From 65612054f64cbb480222fb5c4bcc3116108ea746 Mon Sep 17 00:00:00 2001 From: lkook Date: Mon, 25 Sep 2023 13:16:46 +0200 Subject: [PATCH] refactor --- R/helpers.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/helpers.R b/R/helpers.R index d271c7e..490ddd2 100644 --- a/R/helpers.R +++ b/R/helpers.R @@ -316,7 +316,7 @@ residuals.binglm <- function(object, ...) { ### Test r <- matrix(controls$residuals(m), ncol = 1) e <- .rm_int(model.matrix(as.formula(env$fml), data = data)) - if (controls$ctest == "gcm.test" & set != "1") # Fit RF for GCM-type test + if (controls$ctest == "gcm.test") # Fit RF for GCM-type test e <- .ranger_gcm(e, c(meff, mand), set, data, controls) }