# NOT RUN {
# save "rtest" in the file "myRecord.*".
filename <- tempfile(pattern = "myRecord", tmpdir = tempdir())
fboot_write(fres = CedarCreek.2004.2006.res,
lboot = CedarCreek.2004.2006.boot.performances,
filename = filename,
opt.var = "performances")
lboot <- fboot_read(filename = filename, opt.var = "performances")
all.equal(lboot, CedarCreek.2004.2006.boot.performances)
# }
Run the code above in your browser using DataLab