R ekstrak regex dari string

library(stringr)

x <- "aaaaa345aaa"
str_extract(x, "[1-9]+")
# [1] "345"
Matthew David