R：使用给定的路径创建一个新文件夹

Question

我想使用R函数在给定路径（newPack）的父文件夹（pathPos）中创建一个新文件夹（path）。

path <- "/m/home/user/unix/R/3.5/stringi"
newPack <- "stringr"

pathPos <- stringi::stri_locate_last_fixed(path, '/')[-1]
pathNew <- paste(stringi::stri_sub(path, 1, pathPos), newPack, sep = '')

dir.create(pathNew)

我可以使用上面的代码来实现这一点，但是我强烈感觉有更好的选择。如果您有任何了解，请告诉我。

Answer 1

path <- "/foo/bar/baz"
newfolder <- "qux"
newpath <- file.path(dirname(path), newfolder)
print(newpath)
# "/foo/bar/qux"
dir.create(newpath)

或者，跳过newpath的中间创建：

path <- "/foo/bar/baz"
newfolder <- "qux"
dir.create(file.path(dirname(path), newfolder))