Commit e6aba3c1 authored by Janis Jatnieks's avatar Janis Jatnieks
Browse files

Update Surr_Train.R to specifically export error indexes.

parent 732eb5e8
......@@ -1321,7 +1321,12 @@ WriteModelResiduals <- function(write_filepath_prefix, training_samples, seed) {
## write out only for those that have non-zero columns
fwrite( SelectActiveColumns(best_res), file = paste0(ensemble_name,"_residuals_best.csv" ))
## residuals are errors on validation data set - created as inverse from these indexes
fwrite( as.data.table(inds), file = paste0(ensemble_name,"_training_idxs.csv" ) )
fwrite
## err index export
err_inds = as.data.table( seq(nrow(Fout))[-inds] )
colnames( err_inds ) <- "err_inds"
fwrite( as.data.table(err_inds), file = paste0(ensemble_name,"_err_inds.csv" ) )
}
## once we have screened all the desired possibilities, we can try to
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment