Skip to content
Snippets Groups Projects
Commit 64c587de authored by Venkat Malladi's avatar Venkat Malladi
Browse files

Merge branch 'remove.tpm.col' into 'develop'

Remove.tpm.col

Closes #67

See merge request !40
parents e6676204 0110ae1f
Branches
Tags
2 merge requests!41Develop,!40Remove.tpm.col
Pipeline #7978 passed with stages
in 1 hour, 26 minutes, and 12 seconds
...@@ -3,8 +3,11 @@ ...@@ -3,8 +3,11 @@
* Output: * Output:
* inputBag * inputBag
* outputBag * outputBag
* Remove gene details from tpm table
* Add EntrezID translation to tpm table (from version specific reference)
**Background** **Background**
* Add GeneSymbol/EnsemblID/EntrezID translation files to references
*Known Bugs* *Known Bugs*
* outputBag does not contain fetch for processed data * outputBag does not contain fetch for processed data
......
docs/dag.png

673 KiB | W: | H:

docs/dag.png

674 KiB | W: | H:

docs/dag.png
docs/dag.png
docs/dag.png
docs/dag.png
  • 2-up
  • Swipe
  • Onion skin
...@@ -19,6 +19,6 @@ convert <- convert[,-1] ...@@ -19,6 +19,6 @@ convert <- convert[,-1]
colnames(convert) <- c("GeneID","EntrezID") colnames(convert) <- c("GeneID","EntrezID")
convert <- unique(convert) convert <- unique(convert)
output <- merge(x=convert,y=countTable,by.x="GeneID",by.y="Geneid",all.x=TRUE) output <- merge(x=convert,y=countTable[,c("Geneid","count","tpm")],by.x="GeneID",by.y="Geneid",all.x=TRUE)
write.table(output,file=paste0(opt$repRID,".tpmTable.csv"),sep=",",row.names=FALSE,quote=FALSE) write.table(output,file=paste0(opt$repRID,".tpmTable.csv"),sep=",",row.names=FALSE,quote=FALSE)
\ No newline at end of file
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment