inst/intdata/R/drake_plan.R

In JGWojtyniak/ospsreports: ospsreports Bookdown Workflow

plan <- drake_plan(
  
  ################################################################################
  #                                                                              #
  #                                Chapter Index                                 #
  #                                                                              #
  ################################################################################
  required_software_raw =  vroom(file_in("intdata/tables/general/required_software.csv"),delim=","),
  required_software_table = tabulate_required_software(required_software_raw),
  ################################################################################
  #                                                                              #
  #                               Chapter General                                #
  #                                                                              #
  ################################################################################
  system_dependent_parameter_raw=read_excel(file_in("intdata/tables/system_dependent_parameters/system_dependent_parameters.xlsx")),
  system_dependent_parameter_table=tabulate_system_dependent_parameter(system_dependent_parameter_raw),
  relative_expressions_raw=fs::dir_ls(path="intdata/tables/system_dependent_parameters/", glob = "*.csv")%>>%
    vroom::vroom(id = "path",delim=","),
  relative_expressions_plots=plot_relative_expressions(relative_expressions_raw),
  general_workflow_plot=plot_general_workflow(),
  cyp_expression_plot=plot_cyp_expression(),
  
  
  
  report = bookdown::render_book(
    input=c(knitr_in("index.Rmd"),
            knitr_in("01-general.Rmd"),
            knitr_in("02-compound.Rmd")
    ),
    output_format = "bookdown::pdf_book"
  )
)