我正在尝试创建一个代码，将所有文件夹/文件从现有文件夹复制到另一个文件夹（原始文件夹包含文件，而更多文件夹包含文件/文件夹...）
我的想法是做这样的事情：
files <- list.files (Dir.origen)
for (i in files)
{
if (!file.info (paste(Dir.origen, i, sep = "/"))$isdir)
file.copy (paste(Dir.origen, i, sep = "/"), Dir.dest)
else dir.create (paste(Dir.dest,i,sep = "/"))
}
并for在else语句中插入相同的循环，并在其中插入更多循环。
我的问题是是否有办法复制整个目录。
每当我在RStudio中创建一个新项目时，我也对源代码感兴趣。
当RStudio为一个空项目创建一个新目录时，我的目标是用我需要的所有内容填充该目录。
我找到了答案，这似乎更容易：
Dir.origen2 <- gsub("/","\\\\", Dir.origen) # Directiories must use backslashes
Dir.dest2 <- gsub("/","\\\\", Dir.dest)
comando <- paste0 ("xcopy ", Dir.origen2, " ", Dir.dest2, " /e /i /y")
system(comando)
/e复制所有目录（包括容器）的位置在哪里，/y不要要求覆盖文档，/i如果Dir.dest不存在则创建一个新目录（我想）。
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句