Question

我正在尝试在R中批量移动不同类型的文件。

origindir <- c("c:/origindir")
targetdir <- c("c/targetdir")
filestocopy <- c("myfile.doc", "myfile.rda", "myfile.xls", 
                 "myfile.txt", "myfile.pdf", "myfile.R")

我尝试了以下操作，但不知道如何处理所有文件：

file.copy(paste (origindir, "myfile.doc", sep = "/"), 
          paste (targetdir, "myfile.doc", sep = "/"), 
          overwrite = recursive, recursive = FALSE, 
          copy.mode = TRUE)

我不知道该怎么做。

Answer 1

正如Joran和Chase已经在评论中指出的那样，你需要做的就是：

file.copy(from=filestocopy, to=targetdir, 
          overwrite = recursive, recursive = FALSE, 
          copy.mode = TRUE)

然后，如果您实际上移动文件，请删除原件：

file.remove(filestocopy)

Answer 2

只是扩大了蔡斯的建议。

lapply(filestocopy, function(x) file.copy(paste (origindir, x , sep = "/"),  
          paste (targetdir,x, sep = "/"), recursive = FALSE,  copy.mode = TRUE))

将文件列表从一个文件夹复制到R中的其他文件夹

2 个答案: