save_outputs | R Documentation |
Save a list of outputs
save_outputs(
outputs,
outfolder = file.path("output"),
generic_suffix = NULL,
save_rds = TRUE,
verbose_level = 1
)
outputs |
'list' of outputs as created by 'generate_outputs' |
outfolder |
Folder in which to store the 'outputs“ |
generic_suffix |
generic suffix. must be length 1 character or NULL. |
save_rds |
Should the input 'outputs' be saved as '.rds' files in in addition to '.out' or '.pdf' files? Defaults to 'FALSE'. |
verbose_level |
Level of verbose information displayed. Default set to '1'. |
The input 'object' invisibly
## As `save_outputs` is the last step in the pipeline we have to run
## the 'whole machinery' in order to show its functionality. Also take a look
## at the `AutoslideR-Demo` repo on code.roche.com.
library(dplyr, warn.conflicts = FALSE)
data <- list(
adsl = eg_adsl,
adae = eg_adae,
adtte = eg_adtte
)
filters::load_filters(
yaml_file = system.file("filters.yml", package = "autoslider.core"),
overwrite = TRUE
)
## For this example the outputs will be saved in a temporary directory. In a
## production run this should be the reporting event's 'output' folder instead.
output_dir <- tempdir()
spec_file <- system.file("spec.yml", package = "autoslider.core")
read_spec(spec_file) %>%
filter_spec(program == "t_dm_slide") %>%
generate_outputs(datasets = data) %>%
decorate_outputs() %>%
save_outputs(outfolder = output_dir)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.