从完整路径中提取文件名之前的文件夹名称

Question

我有以下路径

filePath <- "/data/folder1/subfolder1/foo.dat"

我希望获得subfolder1 foo.dat所在的位置。我看到了其他语言的解决方案，但在R中没有找到一个。最简单的方法是什么？谢谢！

我尝试了什么

> basename(filePath)
[1] "foo.dat"

> dirname(filePath)
[1] "/data/folder1/subfolder1"

Answer 1

这可能会解决：

filePath <- "/data/folder1/subfolder1/foo.dat"

basename(dirname(filePath))

http://www.r-fiddle.org/#/fiddle?id=IPftVEDk&version=1

Answer 2

这可能不是最漂亮的答案，但它会对你有用：

unlist(strsplit(filePath, '/'))[length(unlist(strsplit(filePath, '/')))-1]