pamr package implementation. Note that
this function uses internal cross-validation for determining the value
of the shrinkage threshold.fit_pamr(x, y, error_fun, cv, threshold = NULL, ...,
thres_fun = function(thr, err) median(thr[err == min(err)]),
slim.fit = FALSE)resampleorresample_hcv$cv.objectsemil, predict_pamr,
importance_pamr, modeling_procedure