如果你想要一个类似file.rename()的函数，它还可以 * 创建 * 执行重命名所需的任何目录，你可以尝试这样做：

my.file.rename <- function(from, to) {
    todir <- dirname(to)
    if (!isTRUE(file.info(todir)$isdir)) dir.create(todir, recursive=TRUE)
    file.rename(from = from,  to = to)
}

my.file.rename(from = "C:/Users/msc2/Desktop/rabata.txt",
               to = "C:/Users/msc2/Desktop/Halwa/BADMASHI/SCOP/rabata.txt")

请注意，file.rename实际上会从“from”文件夹中删除该文件。如果你只想复制一个副本，并将原始副本保留在原来的位置，请使用file.copy。

使用file.copy()或fs::file_copy()

file.copy(from = "path_to_original_file",
          to   = "path_to_move_to")

然后您可以使用file.remove()删除原始文件：

file.remove("path_to_original_file")

更新2021-10-08：也可以使用fs::file_copy()。我喜欢{fs}在R中实现一致的文件和目录管理。

你可以试试filesstrings库。此选项将文件移动到目录中。示例代码：
首先，我们创建一个示例目录和文件：

dir.create("My_directory")
file.create("My_file.txt")

第二，我们可以将My_file.txt移动到创建的目录My_directory中：

file.move("My_file.txt", "My_directory")

您在第二个扩展名中缺少一个“t”字母。试试这个：

file.rename(from="C:/Users/msc2/Desktop/rabata.txt",to="C:/Users/msc2/Desktop/Halwa/BADMASHI/SCOP/rabata.txt").

此外，值得尝试file.copy()函数。它是专门设计来复制文件，而不是重命名。

fs::file_move("oldfile.txt", "some/other/existing/directory/newfile.txt")