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