method wapls2 is deprecated!

l-ramirez-lopez · Feb 10, 2016 · 2d88af5 · 2d88af5
1 parent 8ef2005
commit 2d88af5
Showing 1 changed file with 1 addition and 2 deletions.
diff --git 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)