在 R 中使用 gregexpr 按名称访问正则表达式组结果

Question

如何使用gregexpr()in R 访问所有带有分组的匹配项（即label）？

s <- "aaa123bbb345ccc"
p <- "(?<label>\\d+)"
m <- gregexpr(p, s, perl = TRUE)

我有兴趣在 m 中打印匹配项，但引用组名 <label1>。这可以在 C# 中轻松完成，但我在 R 中苦苦挣扎，我无法从 CRAN 文档中弄清楚如何做到这一点。

编辑：G Grothendieck 请求的以下 C# 代码：

string s = "aaa123bbb345ccc";
string p = @"(?<label>\d+)";
Regex r = new Regex(p);
Match m = r.Match(s);
if (m.Success)
{
    Console.WriteLine(m.Groups["label"].Value);
}

Answer 1

这将只返回与label 关联的子字符串。

st <- attr(m[[1]], "capture.start")[, "label"]
len <- attr(m[[1]], "capture.length")[, "label"]
substring(s, st, st + len - 1)
## [1] "123" "345"