| Previous changeset 8:0dc610053f6d (2018-12-04) Next changeset 10:231a8d8d4f5e (2018-12-05) |
|
Commit message:
Uploaded |
|
modified:
xlsx2tab.R |
| b |
| diff -r 0dc610053f6d -r 74d5dc8f7465 xlsx2tab.R --- a/xlsx2tab.R Tue Dec 04 20:26:44 2018 -0500 +++ b/xlsx2tab.R Wed Dec 05 15:30:12 2018 -0500 |
| [ |
| @@ -4,9 +4,10 @@ args = commandArgs(trailingOnly=TRUE) -newname<-paste(args[1], "xlsx", sep=".") -file.copy(args[1],newname, overwrite=TRUE) -sheet<-read_excel(newname,sheet=args[2]) +#newname<-paste(args[1], "xlsx", sep=".") +#file.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) } |