regex - レグマッチが非マッチを落とすのを防ぐには?

Question

NA最初の一致をキャプチャし、一致がなければ戻りたいと思います。

regexpr("a+", c("abc", "def", "cba a", "aa"), perl=TRUE)
# [1]  1 -1  3  1
# attr(,"match.length")
# [1]  1 -1  1  2

x <- c("abc", "def", "cba a", "aa")
m <- regexpr("a+", x, perl=TRUE)
regmatches(x, m)
# [1]  "a"  "a"  "aa"

だから私は「a」、NA、「a」、「aa」を期待していました