combine-methods {mogsa} | R Documentation

## Combine two objects of class `mgsa` into one.

### Description

This function could only be used to combine two "mgsa" objects at present; using "Reduce" function to combine more.

### Usage

      combine(x, y, ...)

### Arguments

`x` | one mgsa object
`y` | another mgsa object
`...` | ignored. Only two mgsa objects could be combined, using "Reduce" to combine more than two sets.

### Value

A combined object of class `mgsa` will be returned.

### Methods

`signature(x = "mgsa", y = "mgsa")`

  To combine two objects of `mgsa`.

This function could only be used to combine two "mgsa" objects; using "Reduce" function to combine more.

### Examples

      # 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, "score"))
      dim(getmgsa(mgsa2, "score"))
      dim(getmgsa(mgsa_comb, "score"))

[Package mogsa version 1.21.0 Index]