using the R package PLS to obtain numeric LOO-CV predictions

#1
Hi,

I am using the R PLS package

PLS predict and PLS predplot

I want to be able to extract the cross-validated predictions, NOT just the fitted values;

model1<-plsr(y~xvalues, data=data1, validation=c("LOO"))

predplot(model1, which="train") displays fitted values, and
predplot(model1, which="validation") displays cross-validated predictions (not the same)

However,

predict(model1) seems to ONLY want to give me the fitted values, NOT the cross-validated predictions that are shown visually by predplot

Any help would be greatly appreciated!!!
Best, Matt