if (FALSE) {
library(BSgenome.Mmusculus.UCSC.mm10)
region.use <- GRanges(
seqnames = c('chr1', 'chr2'),
IRanges(start = c(1,1), end = c(195471971, 182113224))
)
InsertionBias(
object = atac_small,
genome = BSgenome.Mmusculus.UCSC.mm10,
region = region.use
)
}
Run the code above in your browser using DataLab