1 ### $(R) $(ROPTS) -f array_to_text.R --args data_file_name array_name array_file.txt
3 arguments <- commandArgs(trailingOnly=TRUE)
4 data.file.name <- arguments[1]
5 data.array <- arguments[2]
6 text.file.name <- arguments[3]
9 eval(parse(text=c("write.table(",data.array,",",
10 "file=text.file.name,",