1
### =========================================================================
2
### RangesMapping methods
3
### -------------------------------------------------------------------------
6
setMethod("granges", "RangesMapping", function(x) {
7
GRanges(space(x), ranges(x))
10
setAs("RangesMapping", "GenomicRanges", function(from) {
12
mcols(gr) <- DataFrame(as.matrix(hits(from)))