mgsa-class {mogsa} | R Documentation |
"mgsa"
mgsa class here.
Objects can be created by calls of the form new("mgsa", ...)
.
call
:call
moa
:Object of class moa
sup
:Object of class moa.sup
signature(x = "mgsa", y = "mgsa")
To combine two objects of class "mgsa" This function could only be used to combine two "mgsa" objects, using "Reduce" function to combine more.
signature(x = "moa", y = "missing")
:
show the "mgsa" result.
Chen Meng
showClass("mgsa") # library(mogsa) # loading gene expression data and supplementary data data(NCI60_4array_supdata) data(NCI60_4arrays) # split gene set annotation into two sets. sup1 <- lapply(NCI60_4array_supdata, function(x) x[, 1:10]) sup2 <- lapply(NCI60_4array_supdata, function(x) x[, -(1:10)]) # project two sets of annotation mgsa1 <- mogsa(x = NCI60_4arrays, sup=sup1, nf=9, proc.row = "center_ssq1", w.data = "inertia", statis = TRUE) mgsa2 <- mogsa(x = NCI60_4arrays, sup=sup2, nf=9, proc.row = "center_ssq1", w.data = "inertia", statis = TRUE) # combine two indenpendent mgsa sets mgsa_comb <- combine(mgsa1, mgsa2) dim(getmgsa(mgsa1, "fac.scr")) dim(getmgsa(mgsa2, "fac.scr")) dim(getmgsa(mgsa_comb, "fac.scr"))