Coefficients for permutation bootstrap computations of PLSR models

Source: R/permcoefs.plsR.R

A function passed to boot to perform bootstrap.

permcoefs.plsR(dataset, ind, nt, modele, maxcoefvalues, ifbootfail, verbose)

Arguments

dataset

dataset to resample
ind

indices for resampling
nt

number of components to use
modele

type of modele to use, see plsR
maxcoefvalues

maximum values allowed for the estimates of the coefficients to discard those coming from singular bootstrap samples
ifbootfail

value to return if the estimation fails on a bootstrap sample
verbose

should info messages be displayed ?

Value

estimates on a bootstrap sample or ifbootfail value if the bootstrap computation fails.

See also

See also bootpls.

Author

Frédéric Bertrand
frederic.bertrand@utt.fr
https://fbertran.github.io/homepage/

Examples


data(Cornell)
XCornell<-Cornell[,1:7]
yCornell<-Cornell[,8]

# Lazraq-Cleroux PLS (Y,X) bootstrap
# statistic=permcoefs.plsR is the default for (Y,X) permutation resampling of PLSR models.
set.seed(250)
modpls <- plsR(yCornell,XCornell,1)

#> ____************************************************____
#> ____Component____ 1 ____
#> ____Predicting X without NA neither in X nor in Y____
#> ****________________________________________________****
#> 
Cornell.bootYX <- bootpls(modpls, sim="permutation", R=250, statistic=permcoefs.plsR, verbose=FALSE)