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

Question

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

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))