Мы можем использовать str_extract
для сопоставления одной или нескольких цифр (\\d+
) после строки 'IAB', за которой следует подчеркивание (_
) и одна или несколько цифр (\\d+
)
library(stringr)
str_extract(v1, 'IAB\\d+_\\d+')
#[1] "IAB1_4" "IAB19_3" "IAB19_16" "IAB9_11" "IAB19_5" "IAB18_1"
Или с regexpr
из base R
regmatches(v1, regexpr('IAB\\d+_\\d+', v1))
#[1] "IAB1_4" "IAB19_3" "IAB19_16" "IAB9_11" "IAB19_5" "IAB18_1"
data
v1 <- c("{\"\"element\"\":\"\"IAB1_4\"\"}", "{\"\"element\"\":\"\"IAB19_3\"\"}",
"{\"\"element\"\":\"\"IAB19_16\"\"}", "{\"\"element\"\":\"\"IAB9_11\"\"}",
"{\"\"element\"\":\"\"IAB19_5\"\"}", "{\"\"element\"\":\"\"IAB18_1\"\"}"
)