generate_slides: generate slides based on output

In autoslider.core: Slide Automation for Tables, Listings and Figures

generate slides based on output

Description

generate slides based on output

Usage

generate_slides(
  outputs,
  outfile = paste0(tempdir(), "/output.pptx"),
  template = file.path(system.file(package = "autoslider.core"), "theme/basic.pptx"),
  fig_width = 9,
  fig_height = 6,
  t_lpp = 20,
  t_cpp = 200,
  l_lpp = 20,
  l_cpp = 150,
  ...
)

Arguments

outputs	List of output
outfile	Out file path
template	Template file path
fig_width	figure width in inch
fig_height	figure height in inch
t_lpp	An integer specifying the table lines per page Specify this optional argument to modify the length of all of the table displays
t_cpp	An integer specifying the table columns per page Specify this optional argument to modify the width of all of the table displays
l_lpp	An integer specifying the listing lines per page Specify this optional argument to modify the length of all of the listings display
l_cpp	An integer specifying the listing columns per page Specify this optional argument to modify the width of all of the listings display
...	arguments passed to program

Value

No return value, called for side effects

Examples

# Example 1. When applying to the whole pipeline
library(dplyr)
data <- list(
  adsl = eg_adsl %>% dplyr::mutate(FASFL = SAFFL),
  adae = eg_adae
)


filters::load_filters(
  yaml_file = system.file("filters.yml", package = "autoslider.core"),
  overwrite = TRUE
)


spec_file <- system.file("spec.yml", package = "autoslider.core")
spec_file %>%
  read_spec() %>%
  filter_spec(program %in% c("t_dm_slide")) %>%
  generate_outputs(datasets = data) %>%
  decorate_outputs() %>%
  generate_slides()

# Example 2. When applying to an rtable object or an rlisting object
adsl <- eg_adsl
t_dm_slide(adsl, "TRT01P", c("SEX", "AGE")) %>%
  generate_slides()

autoslider.core documentation built on April 4, 2025, 2:05 a.m.