knitr::opts_chunk$set( collapse = TRUE, comment = "#>" )
reticulate::use_condaenv('mlr3keras', required = TRUE) devtools::load_all()
perfs = rbindlist(map(cfgs()$keys(), function(k) { sdir = cfgs(k, workdir=workdir)$subdir if (!is.null(sdir)) { file = paste0(sdir, "surrogate_test_metrics.csv") fread(file)[, problem := k] } }), fill=TRUE) perfs[, grp := NULL] knitr::kable(perfs[, c(6,1,2:5)])
cfg = cfgs("nb301", workdir=workdir) obj = cfg$get_objective() data = cfg$data idx = 1:1000000 ptest = obj$eval_dt(data$xtest[idx]) dt = rbind( compute_metrics( response = cfg$data$ytest[idx,], prediction = as.matrix(ptest) ), compute_metrics( response = cfg$data$ytest[idx,], prediction = as.matrix(ptest), stratify = cfg$data$xtest[idx, cfg$task_col] ) ) dt
cfg = cfgs("rbv2_super", workdir=workdir) obj = cfg$get_objective() idx = 1:1000 ptest = obj$eval_dt(cfg$data$xtest[idx]) compute_metrics( response = cfg$data$ytest[idx,], prediction = as.matrix(ptest), stratify = cfg$data$xtest[idx, cfg$task_col] )
list.files(workdir)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.