Revision ce82484948ede7069cb0876916e6f993db2decf9 authored by pat-s on 26 November 2019, 22:20:58 UTC, committed by pat-s on 26 November 2019, 22:20:58 UTC
1 parent 0645b98
OptWrapper.R
makeOptWrapper = function(id, learner, resampling, measures, par.set, bit.names, bits.to.features,
control, show.info, learner.subclass, model.subclass) {
x = makeBaseWrapper(id, learner$type, learner, learner.subclass = c(learner.subclass, "OptWrapper"),
model.subclass = model.subclass)
x$resampling = resampling
x$measures = measures
x$opt.pars = par.set
x$bit.names = bit.names
x$bits.to.features = bits.to.features
x$opt.pars = par.set
x$control = control
x$show.info = show.info
return(x)
}
#' @export
print.OptModel = function(x, ...) {
print.WrappedModel(x)
cat("\nOptimization result:\n")
print(x$learner.model$opt.result)
}
![swh spinner](/static/img/swh-spinner.gif)
Computing file changes ...