在 R 中一次在目录内创建子目录

pat*_*atL 2 directory r function subdirectory

我一直在 SO 中寻找一个关于如何在 R 中同时在一个目录中创建两个(或 n 个)子目录的线程,但只发现不是我想要的。

我可以通过以下两行来完成:

dir.create(file.path(getwd(), "test"))

sapply(letters[1:2], 
   function(x) dir.create(file.path(getwd(), "test", paste0(x, "_test"))))

#   a    b 
#TRUE TRUE 
Run Code Online (Sandbox Code Playgroud)

我怎样才能在一行中完成它?

谢谢。

小智 7

dir.create(file.path(getwd(), '测试'), 递归 = TRUE)