¿Cómo evitar que los regmatches no coincidan?
Me gustaría capturar el primer partido, y volver.NA
Si no hay partido.
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"
Así que esperaba "a", NA, "a", "aa"