# HG changeset patch
# User dktanwar
# Date 1513618262 18000
# Node ID c2ec7fb35e971b503fb6f69a0e02b99b1d6427ff
# Parent  ee07a679ac0866811d529e0e3ecfcd13be04f59b
Uploaded

diff -r ee07a679ac08 -r c2ec7fb35e97 csaw.R
--- a/csaw.R	Mon Dec 18 12:10:21 2017 -0500
+++ b/csaw.R	Mon Dec 18 12:31:02 2017 -0500
@@ -60,7 +60,7 @@
 
 for(i in 4:(ncol(table_sp)-1)){
   tmp <- table_sp[,c(ncol(table_sp), i)]
-  n <- colnames(table_sp)[i]
+  n <- paste0(colnames(table_sp)[i],".tsv")
   fwrite(x = tmp, file = n, quote = F, row.names = F, sep = "\t")
 }