在 R 中的字符串中查找连续值

Finding consecutive values in a string in R

提问人:margo 提问时间:8/27/2022 更新时间:8/27/2022 访问量:120

问:

我正在尝试在数据框字符串的最后 10 个字母中找到 3 个或更多连续的“a”。我的数据框如下所示:

V1
aaashkjnlkdjfoin
jbfkjdnsnkjaaaas
djshbdkjaaabdfkj
jbdfkjaaajbfjna
ndjksnsjksdnakns
aaaandfjhsnsjna

我已经编写了这段代码,但是它只是得到了整个字符串中连续“a”的数量。但是,我想这样做,所以它只查看最后 10 位数字,然后打印找到连续“a”的字符串。我写的代码是:

out: [1] 3 

我希望我的输出看起来像这样:

jbfkjdnsnkjaaaas
djshbdkjaaabdfkj
jbdfkjaaajbfjna

谁能帮忙

r 字符串 序列 stringr

评论

0赞 cory 8/27/2022
我会使用子字符串来获取最后 10 个字符,然后使用 grepl 检查该子字符串中的任何 aaa 值。
1赞 akrun 8/27/2022
尝试subset(df1, grepl("(a)\\1{2,}", substring(V1, nchar(V1)-9, nchar(V1))))

答:

0赞 Onyambu 8/27/2022 #1

使用正则表达式,您可以执行以下操作:

grep("(?=.{10}$).*?a{3,}", string, perl = TRUE, value = TRUE)
[1] "jbfkjdnsnkjaaaas" "djshbdkjaaabdfkj" "jbdfkjaaajbfjna" 

string <- c("aaashkjnlkdjfoin", "jbfkjdnsnkjaaaas", "djshbdkjaaabdfkj", 
            "jbdfkjaaajbfjna", "ndjksnsjksdnakns", "aaaandfjhsnsjna")

如果您有一个 DataFrame 并且需要对其进行子集:

subset(df, grepl("(?=.{10}$).*?a{3}",V1, perl = TRUE))
                V1
2 jbfkjdnsnkjaaaas
3 djshbdkjaaabdfkj
4  jbdfkjaaajbfjna