R/move_file.R

Defines functions move_file

move_file <- function(from, to) {
  todir <- dirname(to)
  if (!isTRUE(file.info(todir)$isdir)) dir.create(todir, recursive=TRUE)
  result <- file.rename(from = from,  to = to)
}
ThomUK/MSDSpipeline documentation built on Oct. 31, 2022, 7:58 a.m.