Develop

workflow/scripts/convertGeneSymbols.R

@@ -10,7 +10,7 @@ rm(option_list)
 countTable <- read.csv(paste0(opt$repRID,".countData.countTable.csv"), stringsAsFactors=FALSE)
 geneID <- read.delim("geneID.tsv", header=FALSE, stringsAsFactors=FALSE)
 Entrez <- read.delim("Entrez.tsv", header=FALSE, stringsAsFactors=FALSE)
-convert <- merge(x=Entrex,y=geneID,by.x="V1",by.y="V1",all.x=TRUE)
+convert <- merge(x=Entrez,y=geneID,by.x="V1",by.y="V1",all.x=TRUE)