Commit 3ab276ae authored by Janis Jatnieks's avatar Janis Jatnieks
Browse files

Fill empty Residuals with NA correctly.

parent cc1078b5
......@@ -490,7 +490,7 @@ write_evals <- function( hist_bins = 25, write_errors=T, Surrogate_performance_t
class(model_list[[1]])
}
else if (write_errors) {
Residuals <<- c( Residuals, list( rep(NA, nrow(Fout) ) )) # list encapsulates it into nested level
Residuals <<- c( Residuals, list( rep(NA, nrow(SRes) ) )) # list encapsulates it into nested level
}
})
}
......
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