bug fix

gagneurlab · Apr 18, 2023 · 5eb1b3b · 5eb1b3b
1 parent 99a9252
commit 5eb1b3b
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/countRNAseqData.R b/R/countRNAseqData.R
@@ -495,7 +495,7 @@ countSplitReads <- function(sampleID, fds, NcpuPerSample=1, genome=NULL,
     chromosomes <- extractChromosomes(bamfile)
 
     if(isFALSE(keepNonStandardChromosomes)){
-        chr_gr <- GRanges(seqnames=paste0(chromosomes, ":1-2"))
+        chr_gr <- GRanges(seqnames=chromosomes, ranges=IRanges(1, 2))
         chromosomes <- standardChromosomes(chr_gr)
     }