14

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)

私はこれを行う方法がわかりません。

4

2 に答える 2

16

JoranとChaseがコメントですでに指摘しているように、あなたがする必要があるのは次のことだけです。

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

次に、実際にファイルを移動する場合は、次のコマンドで元のファイルを削除します。

file.remove(filestocopy)
于 2012-04-24T15:26:55.440 に答える
1

チェイスの提案を拡張するだけです。

lapply(filestocopy, function(x) file.copy(paste (origindir, x , sep = "/"),  
          paste (targetdir,x, sep = "/"), recursive = FALSE,  copy.mode = TRUE))
于 2012-04-24T16:20:05.887 に答える