Mercurial > repos > ylebras > xlsx2tab

annotate xlsx2tab.R @ 0:0f319ef24434 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author ylebras
date Mon, 03 Dec 2018 16:23:20 -0500
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
1 #!/usr/bin/env Rscript
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
2 #Read Xlsx sheets - return tabular
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
3 library(readxl)
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
4
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
5 args = commandArgs(trailingOnly=TRUE)
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
6
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
7 sheet<-read_excel(args[1],sheet=args[2])
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
8 write.table(sheet,"out.tabular",sep="\t",row.names=FALSE)
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
9
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
10 }
0f319ef24434 Uploaded
ylebras
parents:
diff changeset
11