## load predictor and response data to the current environment
data (murnau.X)
data (murnau.Y)
## call autopls with the standard options
model<-autopls (murnau.Y ~ murnau.X)
## set another number of latent vectors
newmodel <- set.lv (model,2)
Run the code above in your browser using DataLab