| Previous changeset 5:5251f7e929a6 (2018-12-04) Next changeset 7:25b2fb62d16a (2018-12-04) |
|
Commit message:
Uploaded |
|
modified:
xlsx2tab.R |
| b |
| diff -r 5251f7e929a6 -r aa529f924b86 xlsx2tab.R --- a/xlsx2tab.R Tue Dec 04 20:01:50 2018 -0500 +++ b/xlsx2tab.R Tue Dec 04 20:15:41 2018 -0500 |
| [ |
| @@ -4,8 +4,9 @@ args = commandArgs(trailingOnly=TRUE) -file.rename(args[1],"input.xlsx") -sheet<-read_excel("input.xlsx",sheet=args[2]) +newname<-args[1]+".xlsx" +file.rename(args[1],newname) +sheet<-read_excel(newname,sheet=args[2]) write.table(sheet,"out.tabular",sep="\t",row.names=FALSE) } |