Как я могу определить текущее имя каталога в 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)