R/Enrichment.R

Defines functions tfbsEnrichment

tfbsEnrichment <- function(pwm, query, background, cutoff=0.8){
  queryHits <- searchSeq(pwm, query, strand="+", min.score=cutoff)
  foo1 <- as(queryHits, "GRanges")
  backgroundHits <- searchSeq(pwm, background, strand="+", min.score=cutoff)
  foo2 <- as(backgroundHits, "GRanges")
}
ge11232002/TFBSTools documentation built on Sept. 12, 2021, 12:07 p.m.