hardcode crossvalidation

AnthonyTedde · Feb 24, 2020 · 12f4c1a · 12f4c1a
1 parent 89a0a1c
commit 12f4c1a
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/R/t_outlier_test.R b/R/t_outlier_test.R
@@ -135,7 +135,8 @@ t_outlier_test_internal <- function(x,
           index <- caret::groupKFold(data[outliers, ][[group]], k = k)
           arguments <- c(
             arguments,
-            list(trControl = caret::trainControl(index = index))
+            list(trControl = caret::trainControl(method = "cv",
+                                                 index = index))
           )
         }, error = function(e){
           stop(e)