powered by
pls1_nipals(X, y, a, it = 50, tol = 1e-08, scale = FALSE)
mvr
pls2_nipals
data(PAC) res <- pls1_nipals(PAC$X,PAC$y,a=5)
Run the code above in your browser using DataLab