2014-10-18 186 views
3

我想複製文件只有從1個根文件夾有100個文件夾和子文件夾。我不想複製文件夾。我只是想將這些文件夾中的所有文件(* .iso,* .txt,* .docx,* .pdf等)複製到另一個文件夾中。如何將文件夾和子文件夾中的文件複製到R中的另一個文件夾?

我的代碼:

setwd("/Users/RLearner/Desktop/RDMS") 

if (file.exists(list.files(path=".",recursive=TRUE))) 
    file.copy(from=".", to="/Users/RLearner/Desktop/Test", recursive=TRUE) 

但這段代碼複製根文件夾,因爲它是在我的期望Test文件夾。我只想複製這些文件夾所具有的文件?

+0

不'file.rename'幫助? – johannes 2014-10-18 11:31:03

+0

不,我以爲是重命名文件和文件夾? – MaxPD 2014-10-18 11:36:44

回答

3

我會做:

from.dir <- "/Users/RLearner/Desktop/RDMS" 
to.dir <- "/Users/RLearner/Desktop/Test" 
files <- list.files(path = from.dir, full.names = TRUE, recursive = TRUE) 
for (f in files) file.copy(from = f, to = to.dir) 
+0

它沒有爲我工作:(你能解釋一下嗎?謝謝編輯:它工作了!!!!錯誤是從我身邊。你是多麼的天才!!謝謝。有一個愉快的週末。@ flodel – MaxPD 2014-10-18 11:41:53

+0

要在嵌套文件夾中複製文件,我使用了file.copy(list.files(from.dir,full.names = TRUE),to.dir,recursive = TRUE)。 – andrekos 2015-11-13 02:01:54

相關問題