revision 1, almost done

2026-05-18 22:43:11 +02:00
parent ada154a107
commit c4b94c7f8f
9 changed files with 489 additions and 227 deletions
@@ -38,6 +38,9 @@ date: ""
 #| label: setup
 #| include: false
 source("deps.R")
+
+debug_mode <- FALSE
+output_format <- "docx"
 ```

 \newpage
@@ -288,9 +291,11 @@ for (i in seq_along(plots)) {
 }

 # combine plots using patchwork
-combined_plot <- wrap_plots(plotlist, ncol = 2) + # remove legend
-  plot_layout(guides = "collect") & theme(legend.position = "none")
+combined_plot <- wrap_plots(plotlist, ncol = 2) #+ # remove legend
+ # plot_layout(guides = "collect") & theme(legend.position = "none")
+
 print(combined_plot)
+
 if (isTRUE(debug_mode)) {
  debug_info[[knitr::opts_current$get("label")]] <- 
    if (knitr::is_html_output()) "HTML" else "LaTeX"