Mercurial > repos > ylebras > xls2tabular

changeset 16:ca89facf5125 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author ylebras
date Wed, 05 Dec 2018 15:56:48 -0500
parents 80cce9439f6e
children cb2493afd265
files xlsx2tab.R
diffstat 1 files changed, 2 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- 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