Mercurial > repos > mnhn65mo > rdata_handler

annotate rdata_reader.R @ 0:10212598b005 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author mnhn65mo
date Tue, 07 Aug 2018 06:02:29 -0400
parents
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
0
10212598b005 Uploaded
mnhn65mo
parents:
diff changeset
1 #!/usr/bin/env Rscript
10212598b005 Uploaded
mnhn65mo
parents:
diff changeset
2 #Return list of attributes from a Rdata file
10212598b005 Uploaded
mnhn65mo
parents:
diff changeset
3
10212598b005 Uploaded
mnhn65mo
parents:
diff changeset
4 args = commandArgs(trailingOnly=TRUE)
10212598b005 Uploaded
mnhn65mo
parents:
diff changeset
5 rda<-load(args[1]) #Load the rdata
10212598b005 Uploaded
mnhn65mo
parents:
diff changeset
6 rdata<-get(rda)
10212598b005 Uploaded
mnhn65mo
parents:
diff changeset
7 names<-names(rdata) #Get the attributes
10212598b005 Uploaded
mnhn65mo
parents:
diff changeset
8 write(names, file = "rdata_list_attr")