diff test/recreate_full.R @ 0:1660665c081e draft

#issue9 branch Updating - - Fxx
author fgiacomoni
date Thu, 19 Nov 2020 14:28:46 +0000
parents
children
line wrap: on
line diff
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/test/recreate_full.R	Thu Nov 19 14:28:46 2020 +0000
@@ -0,0 +1,21 @@
+#!/home/lain/R/bin/Rscript
+
+file.copy("../data/full.rdata", "../data/full.rdata.old")
+load("../data/full.rdata", rdata <- new.env())
+
+zipfile <- normalizePath("../data/farid_zip.zip", mustWork=TRUE)
+listOFlistArguments <- rdata$listOFlistArguments
+diffrep <- rdata$diffrep
+variableMetadata <- rdata$variableMetadata
+xa <- rdata$xa
+singlefile <- rdata$singlefile
+
+save(
+    zipfile,
+    listOFlistArguments,
+    diffrep,
+    variableMetadata,
+    xa,
+    singlefile,
+    file="../data/full.rdata"
+)
\ No newline at end of file