R/combine_lines.R

combine_lines <- function(lines){
  oneline <- paste0(lines, collapse = "NEW.")
  out <- strsplit(oneline, split = "NEW.NEW.NEW.", fixed = TRUE)[[1]]
  out <- gsub("NEW.", "", out, fixed = TRUE)
  out
}
HughParsonage/grattanReporter documentation built on May 7, 2019, 5:02 a.m.