R/tar_helper_raw.R

In wlandau/targets: Dynamic Function-Oriented 'Make'-Like Declarative Pipelines

Defines functions tar_helper_raw

Documented in tar_helper_raw

#' @rdname tar_helper
#' @export
tar_helper_raw <- function(path = NULL, code = NULL) {
  tar_assert_chr(path)
  tar_assert_scalar(path)
  dir_create(dirname(path))
  writeLines(deparse_script_code(code), path)
  invisible()
}