diff --git a/R/helpers_sfcb.R b/R/helpers_sfcb.R index 99ad0fbb33915a91456c5bc686e6e920fe80edd5..455b28aeca58b3b180a986a3e30f26f315eb2a9c 100644 --- a/R/helpers_sfcb.R +++ b/R/helpers_sfcb.R @@ -150,6 +150,7 @@ compute_origimportance <- function(ind, importances, input_groups, freq_groups, data.frame("var" = names_sd, "sd" = out_sd), by = "var", all = TRUE) rownames(out) <- out$var + out <- out[varnames, ] out$var <- NULL }