...

Author: sebffischer

NAMESPACE

@@ -11,7 +11,6 @@ S3method(as_pipeop,Filter)
 S3method(as_pipeop,Learner)
 S3method(as_pipeop,PipeOp)
 S3method(as_pipeop,default)
-S3method(assert_internal_tuning,GraphLearner)
 S3method(marshal_model,Multiplicity)
 S3method(marshal_model,graph_learner_model)
 S3method(marshal_model,pipeop_impute_learner_state)

R/GraphLearner.R

@@ -424,18 +424,6 @@ set_validate.GraphLearner = function(learner, validate, ids = NULL, args = list(
   invisible(learner)
 }
 
-
-#' @export
-assert_internal_tuning.GraphLearner = function(learner, ids, ...) {
-  if (length(ids)) {
-    walk(learner_wrapping_pipeops(learner), function(po) {
-      assert_internal_tuning(po$learner, ids = po$param_set$ids()[sprintf("%s.%s", po$id, po$param_set$ids()) %in% ids])
-    })
-  }
-  invisible(learner)
-}
-
-
 #' @export
 marshal_model.graph_learner_model = function(model, inplace = FALSE, ...) {
   xm = map(.x = model, .f = marshal_model, inplace = inplace, ...)

man/mlr_learners_avg.Rd

@@ -625,13 +625,6 @@ test_that("internal_tuned_values", {
   expect_equal(names(glrn2$internal_tuned_values), "classif.debug.iter")
 })
 
-test_that("assert_internal_tuning", {
-  glrn = as_learner(as_pipeop(lrn("classif.debug", iter = 100, early_stopping = TRUE, validate = 0.2)))
-  expect_learner(assert_internal_tuning(glrn, "classif.debug.iter"))
-  glrn$param_set$set_values(classif.debug.early_stopping = FALSE)
-  expect_error(assert_internal_tuning(glrn, "classif.debug.iter"))
-})
-
 test_that("set_validate", {
   glrn = as_learner(as_pipeop(lrn("classif.debug", validate = 0.3)))
   set_validate(glrn, "test")