使用R检查文件是否打开并强制关闭

Question

下午好，R用户。我还有另外一个问题。

我目前正在最终确定我的R文本挖掘代码，我希望能够强制关闭最终数据文件，如果它应该在用户的计算机上打开。一般的想法是，由于此代码每次运行时都会覆盖文件，因此强制关闭该文件将是保证我不会获得权限/锁定错误的好方法。

这个想法如下： if file = open，关闭文件，否则没有

有没有人知道某些包或某些代码可以用于此类事情？

谢谢！

Answer 1

isOpen功能正是您想要的。查看更多here。

Answer 2

isOpen仅检查连接是否打开，而不检查文件。

这可以完成工作：

file.opened <- function(path) {
  suppressWarnings(
    "try-error" %in% class(
      try(file(path, 
               open = "w"), 
          silent = TRUE
      )
    )
  )
}

它检查是否可以打开文件进行写入（open = "w"），这在用户打开文件时是不可能的。我用它来检查是否已打开Excel文件。