# NOT RUN {
gr <- as_granges(data.frame(start = 10:15,
width = 5,
seqnames = "seq1"))
gr2 <- as_granges(data.frame(start = 11:14,
width = 1:4,
seqnames = "seq2"))
bind_ranges(gr, gr2)
bind_ranges(a = gr, b = gr2, .id = "origin")
bind_ranges(gr, list(gr, gr2), gr2)
bind_ranges(list(a = gr, b = gr2), c = gr, .id = "origin")
# }
Run the code above in your browser using DataLab