data(rrbs)
rrbs <- rawToRel(rrbs)
regions <- GRanges(IRanges(start=c(850000, 1920000, 500), end=c(879000, 1980000, 600)),
seqnames=c("chr1", "chr2", "chr3"))
globalTest(group~1, rrbs)
globalTest(group~1, rrbs, subsets=regions)
Run the code above in your browser using DataLab