从右到左裁剪字符串，直到某个字符满足R

Question

我希望从右到左操作/剪切字符串，直到满足特定字符为止。

我想拿这个：a <- "L1.L2.L3.L4.L5"，然后输出这个：a <- "L5"

我特别将这个问题写成需要从右到左裁剪字符串，因为字符串可以是可变长度的，输出字符串也可以是可变长度的。

例如，代码需要处理：

b <- "L1.L555"

c <- "L1.L2.L3.L4.L5.L6.LLLL"

Answer 1

我们可以使用sub来匹配字符(.*)，直到. (.是任何字符的元字符)为止。因此，我们转义(\\)来评估它的字面意义)，并将其替换为空白("")。

sub(".*\\.", "", a)
#[1] "L5"

sub(".*\\.", "", b)
#[1] "L555"

sub(".*\\.", "", c)
#[1] "LLLL"

或者使用trimws

trimws(a, whitespace = ".*\\.")
#[1] "L5"