如何确定R中的当前目录名？

Question

我遇到的唯一解决方案是使用正则表达式并递归替换第一个目录，直到得到没有斜杠的单词。

gsub("/\\w*/","/",gsub("/\\w*/","/",getwd()))

有什么稍微优雅的吗？ （而且更便携？）

Answer 1

您的示例代码对我不起作用，但您可能正在寻找basename或dirname：

> getwd()
[1] "C:/cvswork/data"
> basename(getwd())
[1] "data"
> dirname(getwd())
[1] "C:/cvswork"

Answer 2

如果您不知道basename（我没有），您可以使用它：

tail(strsplit(getwd(), "/")[[1]], 1)