# HG changeset patch
# User ylebras
# Date 1536676633 14400
# Node ID f1b7d0032530eecac70d52b8744efa904b5f439d
# Parent  659820e2aa6176abb20723ab850eb0983f57333f
Uploaded

diff -r 659820e2aa61 -r f1b7d0032530 tab2csv.R
--- a/tab2csv.R	Wed Aug 08 06:23:04 2018 -0400
+++ b/tab2csv.R	Tue Sep 11 10:37:13 2018 -0400
@@ -6,7 +6,7 @@
 
 if(args[3]=="TRUE"){
     tabular<-read.table(args[1],sep="\t",header=TRUE)
-    write.tale(tabular,"out.csv",sep=args[2],row.names=FALSE)
+    write.table(tabular,"out.csv",sep=args[2],row.names=FALSE)
 }else{
     tabular<-read.table(args[1],sep="\t",header=FALSE)
     write.table(tabular,"out.csv",sep=args[2],col.names=FALSE,row.names=FALSE)