Displaying 1 result from an estimated 1 matches for "objns".
Did you mean:
obj's
2014 May 22
1
Excluding objects from save.image
...outfile <- paste0(file, "Tmp")
i <- 0
while (file.exists(outfile)) {
i <- i + 1
outfile <- paste0(file, "Tmp", i)
}
}
else outfile <- file
on.exit(file.remove(outfile))
### Omit objects inheriting from "no.save" ###
objns <- ls(envir = .GlobalEnv, all.names = TRUE)
if ( omit.no.save ) ### make part of options?
objns <- subset(objns, sapply(objns, function(x)
{
! inherits(get(x, envir = .GlobalEnv), "no.save")
}))
save(list = objns, file = outfile,
version = version, as...