Displaying 1 result from an estimated 1 matches for "plsnocv".
Did you mean:
plscv
2005 May 12
1
pls -- crossval vs plsr(..., CV=TRUE)
...9
R: Aqua GUI 1.01, v 2.0.1
I want to get R^2 and Q^2 (LOO and Leave-10-Out) values for each
component for my model.
I was running into a few problems so I played with the example a little
and the results do not match up with the comments
in the help pages.
$ library(pls)
$ data(NIR)
$ testing.plsNOCV <- plsr(y ~ X, 6, data = NIR, method="kernelpls",
validation="none")
$ NIR.plsCV <- plsr(y ~ X, 6, data = NIR, CV=TRUE, method="kernelpls")
$ testing.plsCV <- crossval(testing.plsNOCV)
$ R2(NIR.plsCV)
(Intercept) 1 comps 2 comps 3 comps 4...