gr1 <- GRanges(seqnames = "chr2", ranges = IRanges(3000, 6000),
strand = "+", score = 5L, GC = 0.45)
gr2 <- GRanges(seqnames = c("chr1", "chr1"),
ranges = IRanges(c(7000,13000), width = 3),
strand = c("+"), score = 3:4, GC = c(0.3, 0.5))
grl <- GRangesList("gr1" = gr1, "gr2" = gr2)
tc <- makeGuitarCoordsFromGRangesList(grl, noBins = 5)
tc
mcols(tc)
Run the code above in your browser using DataLab