getmgsa {mogsa} | R Documentation

## get values in an object of class "mgsa".

### Description

get values/slot in an object of class "mgsa". The "mgsa" consists of two S4 class objects, `moa-class` and `moa.sup-class`. This function could extract values in these two components directly.

### Usage

    	getmgsa(mgsa, value)

### Arguments

`mgsa` | An object of class `mgsa-class`.
`value` | The name of the value want to extract from "mgsa". See detail for options.

### Details

if value in c("call", "moa", "sup"), the function equal function `slot`.

if value in c("eig", "tau", "partial.eig", "eig.vec", "loading", "fac.scr", "partial.fs", "ctr.obs", "ctr.var", "ctr.tab", "RV"), the function extact corresponding value from `moa-class`.

if value in c("data", "coord.sep", "coord.comb", "score", "score.data", "score.pc", "score.sep", "p.val"), the function extract value from `moa.sup-class`.

### Value

The function return the selected value in "mgsa".

### Author(s)

Chen Meng

### References

TBA

### Examples

    	# library(mogsa)
    	# loading gene expression data and supplementary data
    	data(NCI60_4array_supdata)
    	data(NCI60_4arrays)
    	mgsa <- mogsa(x = NCI60_4arrays, sup=NCI60_4array_supdata, nf=9,
    	              proc.row = "center_ssq1", w.data = "inertia", statis = TRUE)
    	part.eig <- getmgsa(mgsa, "partial.eig")
    	barplot(as.matrix(part.eig))

[Package mogsa version 1.21.0 Index]