diff --git a/workflow/scripts/convertGeneSymbols.R b/workflow/scripts/convertGeneSymbols.R index 452f450d79bd2928fa5a26acc36569b8fbfd1572..52fbb8ef465fd932dfb14f33676bc5c2e2ae74d3 100644 --- a/workflow/scripts/convertGeneSymbols.R +++ b/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)