R/get_results_dir.R

get_results_dir <- function(adir) {
  rn <- stringr::str_sub(adir, 1, nchar(adir) - nchar(basename(adir)))
  rn <- paste0(rn, "results")
}
rsimon64/FragmanUI documentation built on May 16, 2019, 7:43 a.m.