0
|
1 #!/home/lain/R/bin/Rscript
|
|
2
|
|
3 file.copy("../data/full.rdata", "../data/full.rdata.old")
|
|
4 load("../data/full.rdata", rdata <- new.env())
|
|
5
|
|
6 zipfile <- normalizePath("../data/farid_zip.zip", mustWork=TRUE)
|
|
7 listOFlistArguments <- rdata$listOFlistArguments
|
|
8 diffrep <- rdata$diffrep
|
|
9 variableMetadata <- rdata$variableMetadata
|
|
10 xa <- rdata$xa
|
|
11 singlefile <- rdata$singlefile
|
|
12
|
|
13 save(
|
|
14 zipfile,
|
|
15 listOFlistArguments,
|
|
16 diffrep,
|
|
17 variableMetadata,
|
|
18 xa,
|
|
19 singlefile,
|
|
20 file="../data/full.rdata"
|
|
21 ) |