Description Usage Arguments Details Value Note Author(s) References See Also Examples
View source: R/import.gsea.edb.R
These edb files are quite large, eg 22 MB for c2_all with 1000 permutations. Size is proportional to the number of permutations.
1 |
x |
A GSEA directory. |
The edb file is quite simple XML, utilising one node per geneset, and lots
of attributes but not sub-terms for each geneset. We use the XML package,
originally from Duncan Temple Lang.
The edb file in the form of an XMLDocument. See xmlTreeParse,
This object appears to be immutable.
Here's some code I found useful in deciphering the XML document:
edb.file <- "T47D_TreatedVsUntreated/c2_all.GseaPreranked.1236217933710/edb/results.edb"
doc <- xmlTreeParse(edb.file)
r <- xmlRoot(doc); xmlAttrs(r); xmlSize(r); xmlSize(r[[1]])
str(xmlAttrs(r[[1]]))
xmlAttrs(r[[1]])[3]
# modify the attributes...
a <- xmlAttrs(r[[1]]) a[3] <- paste(a[3], "_MJC", sep="")
n <- xmlNode("DTG", attrs=a) r[[1]] <- n
Mark Cowley, 2009-10-12
Omega hat XML: http://www.omegahat.org/RSXML/ Quick Guide to the XML package: http://www.omegahat.org/RSXML/Tour.pdf
xmlTreeParse, import.gsea,
gsea.rename.genesets.edb
1 2 3 4 5 6 7 | ## Not run:
edbT <- import.gsea.edb("T47D_TreatedVsUntreated/c2_all.GseaPreranked.1236217933710")
edbM <- import.gsea.edb("MCF7_TreatedVsUntreated/c2_all.GseaPreranked.1236217933720")
edb.merged <- merge.gsea.edb("T47D_TreatedVsUntreated/c2_all.GseaPreranked.1236217933710", "MCF7_TreatedVsUntreated/c2_all.GseaPreranked.1236217933720", c("T47D_", "MCF7_"), c("", ""))
export.gsea.edb(edb.merged, "./merged")
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.