if (FALSE) # not exported, so not tested
dat0 <- list("a sentence with citation (Ref. 12), (Ref. 13), and then (Ref. 14)",
"another sentence without reference")
pat <- "Ref. (\\d+)"
util_extract_matches(dat0, pat)
Run the code above in your browser using DataLab