@@ -85,18 +85,19 @@ test_that("default_surrogate", {
8585 expect_r6(surrogate , " SurrogateLearner" )
8686 expect_r6(surrogate $ learner , " GraphLearner" )
8787 expect_equal(surrogate $ learner $ graph $ ids(), c(" imputesample" , " imputeoor" , " colapply" , " regr.ranger" ))
88- expect_equal_sorted(surrogate $ learner $ param_set $ values ,
89- list (imputesample.affect_columns = mlr3pipelines :: selector_type(" logical" ),
90- imputeoor.min = TRUE ,
91- imputeoor.offset = 1 ,
92- imputeoor.multiplier = 3 ,
93- imputeoor.affect_columns = mlr3pipelines :: selector_type(c(" integer" , " numeric" , " character" , " factor" , " ordered" )),
94- colapply.applicator = as.factor ,
95- colapply.affect_columns = mlr3pipelines :: selector_type(" character" ),
96- regr.ranger.num.threads = 1L ,
97- regr.ranger.num.trees = 100L ,
98- regr.ranger.keep.inbag = TRUE ,
99- regr.ranger.se.method = " jack" ))
88+ list_expected = list (imputesample.affect_columns = mlr3pipelines :: selector_type(" logical" ),
89+ imputeoor.min = TRUE ,
90+ imputeoor.offset = 1 ,
91+ imputeoor.multiplier = 3 ,
92+ imputeoor.affect_columns = mlr3pipelines :: selector_type(c(" integer" , " numeric" , " character" , " factor" , " ordered" )),
93+ colapply.applicator = as.factor ,
94+ colapply.affect_columns = mlr3pipelines :: selector_type(" character" ),
95+ regr.ranger.num.threads = 1L ,
96+ regr.ranger.num.trees = 100L ,
97+ regr.ranger.keep.inbag = TRUE ,
98+ regr.ranger.se.method = " jack" )
99+ expect_equal_sorted(surrogate $ learner $ param_set $ values [names(list_expected )], list_expected )
100+
100101 expect_r6(surrogate $ learner $ fallback , " LearnerRegrFeatureless" )
101102
102103 # specify own learner, specify n_objectives, twocrit all numeric, deterministic
0 commit comments