# \donttest{
data("freelive2")
nRep <- 2
nOuter <- 4
varRatio <-0.6
regrModel <- MUVR2(X = XRVIP2,
Y = YR2,
nRep = nRep,
nOuter = nOuter,
varRatio = varRatio,
method = "PLS",
modReturn = TRUE)
H0_test(regrModel)
# }
Run the code above in your browser using DataLab