我正在尝试找到一种方法来阻止在R中使用save()和save.image()函数时意外覆盖文件。
最佳答案
使用file.exists()
测试文件是否存在,如果存在,则在名称后附加一个字符串。
编辑:
谢谢Marek,我将进一步介绍您的想法...他可以添加它来处理save()
和save.image()
SafeSave <- function( ..., file=stop("'file' must be specified"), overwrite=FALSE, save.fun=save) {
if ( file.exists(file) & !overwrite ) stop("'file' already exists")
save.fun(..., file=file)
}
我不会覆盖保存...如果在REPL session 中使用了
source()
,则用户可能不会意识到该函数将被覆盖。
关于r - 防止在使用save()或save.image()时覆盖文件,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/1541679/