From 4de81a880ae52981fcc910bb0f723266cd43bbfc Mon Sep 17 00:00:00 2001 From: Noah Flynn Date: Fri, 9 Feb 2018 12:08:47 -0600 Subject: [PATCH] Consolidation of chr prefix naming --- R/compIdent_bamRcnt.R | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/R/compIdent_bamRcnt.R b/R/compIdent_bamRcnt.R index ec7c776..8d4226f 100644 --- a/R/compIdent_bamRcnt.R +++ b/R/compIdent_bamRcnt.R @@ -37,11 +37,11 @@ compIdent_bamRcnt <- function(bamfile, genome, target=NULL, debug=FALSE) # Target locations must conform to the bam files being read in, create # two versions one with "chr1" and the other with "1" and use whichever is # appropriate + target.chr <- target if(any(grepl("chr", target$chr))) { target$chr <- gsub("chr", "", target$chr) } else { - target.chr <- target target.chr$chr <- paste0("chr", target$chr) } @@ -115,4 +115,4 @@ compIdent_bamRcnt <- function(bamfile, genome, target=NULL, debug=FALSE) "var", "name")] return(x) -} \ No newline at end of file +}