powered by
plotresmvr(mvrdcvobj, optcomp, y, X, method = "simpls", ...)
mvr_dcv
mvr
require(pls) data(yarn) res <- mvr_dcv(density~NIR,ncomp=10,data=yarn,method="simpls",repl=10) plot4 <- plotresmvr(res,opt=7,yarn$density,yarn$NIR,method="simpls")
Run the code above in your browser using DataLab