The only solution I\'ve encountered is to use regular expressions and recursively replace the first directory until you get a word with no slashes.
gsub(\"/\
If you didn't know basename
(and I didn't), you could have used this:
tail(strsplit(getwd(), "/")[[1]], 1)
Your example code doesn't work for me, but you're probably looking for either basename
or dirname
:
> getwd()
[1] "C:/cvswork/data"
> basename(getwd())
[1] "data"
> dirname(getwd())
[1] "C:/cvswork"