正则表达式grepl用于特定和重复的模式

您可以使用

"^[[:alnum:]]+(?:_\\d+){2}(?:\\.\\d+)?(?:\\|[[:alnum:]]+(?:_\\d+){2}(?:\\.\\d+)?)*$"

见正则表达式演示

在R中使用

x <- c("lkas32kj_123_3.21", "lkas32kj_123_3.21|l3kj_12_0.21|123e_4_32.1", "+++NO+++")
rx <- "[[:alnum:]]+(?:_\\d+){2}(?:\\.\\d+)?"
grepl(paste0("^", rx, "(?:\\|", rx ,")*$"), x)

在线查看R演示。

模式如下：^{single_item_regex}(?:\|{single_item_regex})*$。它匹配：

• ^ -字符串开始
• {single_item_regex}-模式你有单项（注意我换成[[:digit:]]用\d把它缩短，但如果你需要坚持到POSIX字符类，你可以）
• (?: -非捕获组的开始：
  • \| - 管道
  • {single_item_regex} -单项模式
• )* -组结束，重复0次或更多次
• $ -字符串结尾。

在单项模式中，建议替换为\.{0,1}\d+，(?:\.\d+)?因为此处的目的是.在末尾匹配一个可选的数字和1+个数字。