GuangchuangYu
/ hack chipseeker annotation with CpGI
Created May 2, 2016
— forked from lpantano/hack chipseeker annotation with CpGI
View hack chipseeker annotation with CpGI
| require(TxDb.Hsapiens.UCSC.hg19.knownGene) | |
| txdb <- TxDb.Hsapiens.UCSC.hg19.knownGene | |
| library(ChIPseeker) | |
| library(GenomicRanges) | |
| # Hack chipseeker function to add annotaiton | |
| getGenomicAnnoStat <- function(peakAnno) { | |
| if ( class(peakAnno) == "GRanges" ) | |
| peakAnno <- as.data.frame(peakAnno) | |
| anno <- peakAnno$annotation | |
| ## anno <- sub(" \\(.+", "", anno) |
GuangchuangYu
/ ppurl-alternative.md
Last active Aug 29, 2015
— forked from zjhiphop/ppurl-alternative.md