... | ... |
@@ -11,7 +11,7 @@ |
11 | 11 |
\item{icaSet}{An object of class \code{IcaSet}} |
12 | 12 |
|
13 | 13 |
\item{params}{An object of class |
14 |
- \code{\link[MineICA:MineICAParams-class]{MineICAParams}} |
|
14 |
+ \code{\link[MineICA:class-MineICAParams]{MineICAParams}} |
|
15 | 15 |
containing the parameters of the analysis} |
16 | 16 |
|
17 | 17 |
\item{path}{The path where results will be saved} |
... | ... |
@@ -50,7 +50,7 @@ |
50 | 50 |
Runs an enrichment analysis of the contributing genes |
51 | 51 |
associated with each component, using the function |
52 | 52 |
\code{hyperGTest} of package |
53 |
- \code{\link[GOstats]{GOstats}}. The easiest way to run |
|
53 |
+ \code{\link{GOstats}}. The easiest way to run |
|
54 | 54 |
enrichment analysis is to use function |
55 | 55 |
\code{\link{runEnrich}}. |
56 | 56 |
} |
git-svn-id: file:///home/git/hedgehog.fhcrc.org/bioconductor/trunk/madman/Rpacks/MineICA@73179 bc3139a8-67e5-0310-9ffc-ced21a209358
1 | 1 |
new file mode 100644 |
... | ... |
@@ -0,0 +1,101 @@ |
1 |
+\name{hypergeoAn} |
|
2 |
+\alias{hypergeoAn} |
|
3 |
+\title{Runs an enrichment analysis per component using package \code{\link{GOstats}}.} |
|
4 |
+\usage{ |
|
5 |
+ hypergeoAn(icaSet, params, |
|
6 |
+ path = paste(resPath(params), "GOstatsEnrichAnalysis/", sep = "/"), |
|
7 |
+ SlistSel, hgCutoff = 0.01, db = "go", onto = "BP", |
|
8 |
+ cond = TRUE, universe, entrez2symbol) |
|
9 |
+} |
|
10 |
+\arguments{ |
|
11 |
+ \item{icaSet}{An object of class \code{IcaSet}} |
|
12 |
+ |
|
13 |
+ \item{params}{An object of class |
|
14 |
+ \code{\link[MineICA:MineICAParams-class]{MineICAParams}} |
|
15 |
+ containing the parameters of the analysis} |
|
16 |
+ |
|
17 |
+ \item{path}{The path where results will be saved} |
|
18 |
+ |
|
19 |
+ \item{SlistSel}{A list of contributing gene projection |
|
20 |
+ values per component. Each element of the list |
|
21 |
+ corresponds to a component and is restricted to the |
|
22 |
+ features or genes exceeding a given threshold. If |
|
23 |
+ missing, is computed by the function.} |
|
24 |
+ |
|
25 |
+ \item{hgCutoff}{The p-value threshold} |
|
26 |
+ |
|
27 |
+ \item{db}{The database to be used (\code{"GO"} or |
|
28 |
+ \code{"KEGG"})} |
|
29 |
+ |
|
30 |
+ \item{onto}{A character specifying the GO ontology to |
|
31 |
+ use. Must be one of \code{"BP"}, \code{"CC"}, or |
|
32 |
+ \code{"MF"}, see |
|
33 |
+ \code{\link[Category:GOHyperGParams-class]{GOHyperGParams}}. |
|
34 |
+ Only used when argument \code{db} is \code{"GO"}.} |
|
35 |
+ |
|
36 |
+ \item{cond}{A logical indicating whether the calculation |
|
37 |
+ should conditioned on the GO structure, see |
|
38 |
+ \code{\link[Category:GOHyperGParams-class]{GOHyperGParams}}.} |
|
39 |
+ |
|
40 |
+ \item{universe}{The universe for the hypergeometric |
|
41 |
+ tests, see |
|
42 |
+ \code{\link[Category:GOHyperGParams-class]{GOHyperGParams}}.} |
|
43 |
+ |
|
44 |
+ \item{entrez2symbol}{A vector of all gene Symbols |
|
45 |
+ involved in the analysis indexed by their Entrez Gene |
|
46 |
+ IDs. It is only used when \code{annotation(params)} is |
|
47 |
+ empty, and allows to associate gene sets to Symbols.} |
|
48 |
+} |
|
49 |
+\description{ |
|
50 |
+ Runs an enrichment analysis of the contributing genes |
|
51 |
+ associated with each component, using the function |
|
52 |
+ \code{hyperGTest} of package |
|
53 |
+ \code{\link[GOstats]{GOstats}}. The easiest way to run |
|
54 |
+ enrichment analysis is to use function |
|
55 |
+ \code{\link{runEnrich}}. |
|
56 |
+} |
|
57 |
+\details{ |
|
58 |
+ An annotation package must be available in |
|
59 |
+ \code{annotation(icaSet)} to provide the contents of the |
|
60 |
+ gene sets. If none corresponds to the technology you deal |
|
61 |
+ with, please choose the org.*.eg.db package according to |
|
62 |
+ the organism (for example org.Hs.eg.db for Homo sapiens). |
|
63 |
+ Save results of the enrichment tests in a '.rda' file |
|
64 |
+ located in |
|
65 |
+ \code{path}/\code{db}/\code{onto}/\code{zvalCutoff(params)}. |
|
66 |
+} |
|
67 |
+\examples{ |
|
68 |
+\dontrun{ |
|
69 |
+## load an example of IcaSet |
|
70 |
+data(icaSetCarbayo) |
|
71 |
+ |
|
72 |
+## define params |
|
73 |
+# Use threshold 3 to select contributing genes. |
|
74 |
+# Results of enrichment analysis will be written in path 'resPath(params)/GOstatsEnrichAnalysis' |
|
75 |
+params <- buildMineICAParams(resPath="~/resMineICACarbayo/", selCutoff=3) |
|
76 |
+ |
|
77 |
+## Annotation package for IcaSetCarbayo is hgu133a.db. |
|
78 |
+# check annotation package |
|
79 |
+annotation(icaSetCarbayo) |
|
80 |
+ |
|
81 |
+## Define universe, i.e the set of EntrezGene IDs mapping to the feature IDs of the IcaSet object. |
|
82 |
+universe <- as.character(na.omit(unique(unlist(AnnotationDbi::mget(featureNames(icaSetCarbayo), |
|
83 |
+ hgu133aENTREZID, ifnotfound = NA))))) |
|
84 |
+ |
|
85 |
+## Apply enrichement analysis (of the contributing genes) to the first components using gene sets from KEGG. |
|
86 |
+# Since an annotation package is available, we don't need to fill arg 'entrez2symbol'. |
|
87 |
+# run the actual enrichment analysis |
|
88 |
+hypergeoAn(icaSet=icaSetCarbayo[,,1], params=params, db="GO",onto="BP", universe=universe) |
|
89 |
+} |
|
90 |
+} |
|
91 |
+\author{ |
|
92 |
+ Anne Biton |
|
93 |
+} |
|
94 |
+\seealso{ |
|
95 |
+ \code{\link{runEnrich}}, \code{\link[xtable]{xtable}}, |
|
96 |
+ \code{\link[biomaRt]{useMart}}, |
|
97 |
+ \code{\link[Category]{hyperGTest}}, |
|
98 |
+ \code{\link[Category:GOHyperGParams-class]{GOHyperGParams}}, |
|
99 |
+ \code{\link{mergeGostatsResults}} |
|
100 |
+} |
|
101 |
+ |