Как определить текущее имя каталога в R?

единственное решение, с которым я столкнулся, - использовать регулярные выражения и рекурсивно заменять первый каталог, пока вы не получите слово без косых черт.

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

есть ли что-нибудь более элегантное? (и более портативный?)

17
command dirname r

2 ответов

ваш пример кода не работает для меня, но вы, вероятно, искали либо basename или dirname:

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

Если вы не знали basename (и я не), вы могли бы использовать это:

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