seSorensen | R Documentation |
Standard error of the sample Sorensen-Dice dissimilarity, asymptotic approach
seSorensen(x, ...)
## S3 method for class 'table'
seSorensen(x, check.table = TRUE, ...)
## S3 method for class 'matrix'
seSorensen(x, check.table = TRUE, ...)
## S3 method for class 'numeric'
seSorensen(x, check.table = TRUE, ...)
## S3 method for class 'character'
seSorensen(x, y, check.table = TRUE, ...)
## S3 method for class 'list'
seSorensen(x, check.table = TRUE, ...)
## S3 method for class 'tableList'
seSorensen(x, check.table = TRUE, ...)
x |
either an object of class "table", "matrix" or "numeric" representing a 2x2 contingency table, or a "character" (a set of gene identifiers) or "list" or "tableList" object. See the details section for more information. |
... |
extra parameters for function |
check.table |
Boolean. If TRUE (default), argument |
y |
an object of class "character" representing a vector of gene identifiers (e.g., ENTREZ). |
This function computes the standard error estimate of the sample Sorensen-Dice dissimilarity, given a 2x2 arrangement of frequencies (either implemented as a "table", a "matrix" or a "numeric" object):
n_{11} | n_{10} |
n_{01} | n_{00} ,
|
The subindex '11' corresponds to those GO terms enriched in both lists, '01' to terms enriched in the second list but not in the first one, '10' to terms enriched in the first list but not enriched in the second one and '00' corresponds to those GO terms non enriched in both gene lists, i.e., to the double negatives, a value which is ignored in the computations.
In the "numeric" interface, if length(x) >= 3
, the values are interpreted
as
(n_{11}, n_{01}, n_{10})
, always in this order.
If x
is an object of class "character", then x
(and y
) must represent
two "character" vectors of valid gene identifiers (e.g., ENTREZ).
Then the standard error for the dissimilarity between lists x
and y
is computed,
after internally summarizing them as a 2x2 contingency table of joint enrichment.
This last operation is performed by function buildEnrichTable
and "valid gene
identifiers (e.g., ENTREZ)" stands for the coherency of these gene identifiers with the arguments
geneUniverse
and orgPackg
of buildEnrichTable
, passed by the ellipsis
argument ...
in seSorensen
.
In the "list" interface, the argument must be a list of "character" vectors, each one representing a gene list (character identifiers). Then, all pairwise standard errors of the dissimilarity between these gene lists are computed.
If x
is an object of class "tableList", the standard error of the Sorensen-Dice dissimilarity
estimate is computed over each one of these tables.
Given k gene lists (i.e. "character" vectors of gene identifiers) l1, l2, ..., lk,
an object of class "tableList" (typically constructed by a call to function
buildEnrichTable
) is a list of lists of
contingency tables t(i,j) generated from each pair of gene lists i and j, with the
following structure:
$l2
$l2$l1$t(2,1)
$l3
$l3$l1$t(3,1), $l3$l2$t(3,2)
...
$lk
$lk$l1$t(k,1), $lk$l2$t(k,2), ..., $lk$l(k-1)t(k,k-1)
In the "table", "matrix", "numeric" and "character" interfaces, the value of the standard error of the Sorensen-Dice dissimilarity estimate. In the "list" and "tableList" interfaces, the symmetric matrix of all standard error dissimilarity estimates.
seSorensen(table)
: S3 method for class "table"
seSorensen(matrix)
: S3 method for class "matrix"
seSorensen(numeric)
: S3 method for class "numeric"
seSorensen(character)
: S3 method for class "character"
seSorensen(list)
: S3 method for class "list"
seSorensen(tableList)
: S3 method for class "tableList"
buildEnrichTable
for constructing contingency tables of mutual
enrichment,
nice2x2Table
for checking the validity of enrichment contingency tables,
dSorensen
for computing the Sorensen-Dice dissimilarity,
duppSorensen
for the upper limit of a one-sided confidence interval
of the dissimilarity, equivTestSorensen
for an equivalence test.
# Gene lists 'atlas' and 'sanger' in 'allOncoGeneLists' dataset. Table of joint enrichment
# of GO terms in ontology BP at level 4.
data(cont_atlas.sanger_BP4)
cont_atlas.sanger_BP4
dSorensen(cont_atlas.sanger_BP4)
seSorensen(cont_atlas.sanger_BP4)
# Contingency table as a numeric vector:
seSorensen(c(56, 1, 30, 47))
seSorensen(c(56, 1, 30))
# (These examples may be considerably time consuming due to many enrichment
# tests to build the contingency tables of mutual enrichment)
# data(allOncoGeneLists)
# ?allOncoGeneLists
# Standard error of the sample Sorensen-Dice dissimilarity, directly from
# two gene lists, from scratch:
# seSorensen(allOncoGeneLists$atlas, allOncoGeneLists$sanger,
# onto = "BP", GOLevel = 3,
# geneUniverse = humanEntrezIDs, orgPackg = "org.Hs.eg.db")
# Essentially, the above code makes the same as:
# cont_atlas.sanger_BP4 <- buildEnrichTable(allOncoGeneLists$atlas, allOncoGeneLists$sanger,
# onto = "BP", GOLevel = 4,
# geneUniverse = humanEntrezIDs, orgPackg = "org.Hs.eg.db")
# cont_atlas.sanger_BP4
# seSorensen(cont_atlas.sanger_BP4)
# All pairwise standard errors (quite time consuming):
# seSorensen(allOncoGeneLists,
# onto = "BP", GOLevel = 4,
# geneUniverse = humanEntrezIDs, orgPackg = "org.Hs.eg.db")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.