R/grep_for_section.R

# abstracts <- lapply(mytxtfiles, function(i) {
#   j <- paste0(scan(i, what = character()), collapse = " ")
#   regmatches(j, gregexpr("(?<=Abstract).*?(?=Introduction)", j, perl=TRUE))
# })
jacob-ogre/hcphb documentation built on May 18, 2019, 8:01 a.m.