From 2d88af5fbee3d5f5e6b3e6ad0b47cc8835007bfd Mon Sep 17 00:00:00 2001 From: l-ramirez-lopez <ramirez.lopez.leo@gmail.com> Date: Wed, 10 Feb 2016 11:47:52 +0100 Subject: [PATCH] method wapls2 is deprecated! --- R/mbl.R | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/R/mbl.R b/R/mbl.R index 14e3f4b..5dc66fb 100644 --- a/R/mbl.R +++ b/R/mbl.R @@ -1523,8 +1523,7 @@ plsCv <- function(x, y, ncomp, mrspi[,jj]<- idxs[!idxs %in% strs] } - }else - { + }else{ ygr <- data.frame(y, grp = as.factor(as.character(group)), order.orig = 1:length(y)) lvls <- levels(ygr$grp) nlv <- nlevels(ygr$grp)