# HG changeset patch
# User ylebras
# Date 1544043408 18000
# Node ID ca89facf5125ff2d45b6925a9b2426c36602e876
# Parent  80cce9439f6ec71d292aea7285477949e97037ba
Uploaded

diff -r 80cce9439f6e -r ca89facf5125 xlsx2tab.R
--- a/xlsx2tab.R	Wed Dec 05 15:50:15 2018 -0500
+++ b/xlsx2tab.R	Wed Dec 05 15:56:48 2018 -0500
@@ -1,13 +1,8 @@
 #!/usr/bin/env Rscript
-#Read Xlsx sheets - return tabular
+#Read xls sheets - return tabular
 library(readxl)
 
 args = commandArgs(trailingOnly=TRUE)
 
-#nfile.copy(args[1],newname, overwrite=TRUE)
-#sheet<-read_excel(newname,sheet=args[2])
 sheet<-read_excel(args[1],sheet=args[2])
-write.table(sheet,"out.tabular",sep="\t",row.names=FALSE)
-
-}
-
+write.table(sheet,"out.tabular",sep="\t",row.names=FALSE)
\ No newline at end of file