使用regexpr函数查找R中的最后一个字符

可以避免使用正则表达式 substr 这样做。

> x <- '/home/rexamine/archivist2/ex///'
> substr(x, nchar(x)-1+1, nchar(x)) == '/'
[1] TRUE

或使用 str_sub 来自 stringr 包裹:

> str_sub(x, -1) == '/'
[1] TRUE

你可以用一个简单的 grepl 作用

> text = "/home/rexamine/archivist2/ex///"
> grepl("/$", text, perl=TRUE)
[1] TRUE
> text = "/home/rexamine/archivist2/ex"
> grepl("/$", text, perl=TRUE)
[1] FALSE

^.*\/$

你可以使用这个。如果最后一个字符不是 / .