R 使用save（）或save.image（）时防止覆盖文件

我试图找到一种方法，在使用R中的save（）和save.image（）函数时，停止意外覆盖文件。

使用

file.exists（）

测试文件是否存在，如果存在，则在名称后附加一个字符串

编辑：

谢谢Marek，我会详细介绍一下你的想法。。。他可以添加这个来处理

save（）

和

save.image（）

---

SafeSave正如文斯所写，您可以使用
file.exists（）
检查是否存在

我建议更换原来的
save
功能：

save <- function( ..., file=stop("'file' must be specified"), overwrite=FALSE ) {
  if ( file.exists(file) & !overwrite ) stop("'file' already exists")
  base::save(..., file=file)
}

save是否有人知道如何创建一个对话框来通知用户要写入的文件已经存在？用户可以在不知道的情况下关闭R会话，并且不保存任何内容。
save <- function( ..., file=stop("'file' must be specified"), overwrite=FALSE ) {
  if ( file.exists(file) & !overwrite ) stop("'file' already exists")
  base::save(..., file=file)
}