匹配多模式我想看看，如果"001"或"100"或"000"的4個(gè)字符的字符串中發(fā)生。0和1..例如，一個(gè)4個(gè)字符串可能類似于"1100"或"0010"或"1001"或"1111"..如何用一個(gè)命令來匹配字符串中的多個(gè)字符串？我知道grep可以用于模式匹配，但是使用grep，每次只能檢查一個(gè)字符串。我想知道是否可以與其他命令或grep本身一起使用多個(gè)字符串。
3 回答
動(dòng)漫人物
TA貢獻(xiàn)1815條經(jīng)驗(yàn) 獲得超10個(gè)贊
|grepor"001|100|000"grep
x <- c("1100", "0010", "1001", "1111")pattern <- "001|100|000"grep(pattern, x)[1] 1 2 3grepl:
grepl(pattern, x)[1] TRUE TRUE TRUE FALSE
?regex
編輯：paste:
myValues <- c("001", "100", "000")pattern <- paste(myValues, collapse = "|")
幕布斯6054654
TA貢獻(xiàn)1876條經(jīng)驗(yàn) 獲得超7個(gè)贊
stringr
require(stringr)mylist = c("1100", "0010", "1001", "1111")str_locate(mylist, "000|001|100")
紅顏莎娜
TA貢獻(xiàn)1842條經(jīng)驗(yàn) 獲得超13個(gè)贊
對(duì)不起，這是一個(gè)附加的回答，但這是太多的評(píng)論行。
我只想提醒你，可以通過paste(..., collapse = "|")作為一個(gè)單一的匹配模式使用是有限的-見下文。也許有人能知道極限在哪里？誠(chéng)然，這一數(shù)字可能不現(xiàn)實(shí)，但根據(jù)要執(zhí)行的任務(wù)，不應(yīng)將其完全排除在我們的考慮之外。
對(duì)于非常多的項(xiàng)，需要一個(gè)循環(huán)來檢查模式的每個(gè)項(xiàng)。
set.seed(0)
samplefun <- function(n, x, collapse){
paste(sample(x, n, replace=TRUE), collapse=collapse)
}
words <- sapply(rpois(10000000, 8) + 1, samplefun, letters, '')
text <- sapply(rpois(1000, 5) + 1, samplefun, words, ' ')
#since execution takes a while, I have commented out the following lines
#result <- grepl(paste(words, collapse = "|"), text)
# Error in grepl(pattern, text) :
# invalid regular expression
# 'wljtpgjqtnw|twiv|jphmer|mcemahvlsjxr|grehqfgldkgfu|
# ...
#result <- stringi::stri_detect_regex(text, paste(words, collapse = "|"))
# Error in stringi::stri_detect_regex(text, paste(words, collapse = "|")) :
# Pattern exceeds limits on size or complexity. (U_REGEX_PATTERN_TOO_BIG)
- 3 回答
- 0 關(guān)注
- 740 瀏覽
添加回答
舉報(bào)
0/150
提交
取消