tests/testthat/download.R

read_data <- function(src, dest) {
  e <- new.env(parent=baseenv())
  sys.source(src, e)
  write.csv(e$mtcars, dest)
}
richfitz/remake documentation built on May 27, 2019, 8:27 a.m.