# see examples in \code{\link{mbpca}}
data("NCI60_4arrays")
moa <- mbpca(NCI60_4arrays, ncomp = 10, k = "all", method = "globalScore", option = "lambda1",
center=TRUE, scale=FALSE)
genes <- moaCoef(moa)
scr <- moaScore(moa)
Run the code above in your browser using DataLab