Mercurial > repos > lain > xseekerpreparator

comparison test/recreate_full.R @ 0:a174cbbb12dd draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
" master branch Updating"
author lain
date Tue, 24 Nov 2020 18:55:08 +0000
parents
children 5be8a770a11d
comparison
equal deleted inserted replaced
-1:000000000000 0:a174cbbb12dd
1 #!/home/lain/R/bin/Rscript
2
3 ZIP <- FALSE
4
5 file.copy("../convert/yann.rdata", "../convert/yann.rdata.old")
6 load("../convert/yann.rdata", rdata <- new.env())
7
8 listOFlistArguments <- rdata$listOFlistArguments
9 diffrep <- rdata$diffrep
10 variableMetadata <- rdata$variableMetadata
11 xa <- rdata$xa
12 if (ZIP) {
13 zipfile <- normalizePath("../convert/yann.zip", mustWork=TRUE)
14 singlefile <- rdata$singlefile
15 } else {
16 singles <- list.files("../convert/")
17 singles <- singles[singles != "yann.rdata"]
18 singlefile <- list()
19 for (single in singles) {
20 singlefile[tools::file_path_sans_ext(single)] <- normalizePath(paste0("../convert/", single))
21 }
22 zipfile <- NULL
23 print(singlefile)
24 }
25
26 save(
27 zipfile,
28 listOFlistArguments,
29 diffrep,
30 variableMetadata,
31 xa,
32 singlefile,
33 file="../convert/yann.rdata"
34 ,version=2
35 )