From 1ab8df352c7a10e6f2dbc8da05fb9db616855756 Mon Sep 17 00:00:00 2001
From: Falk Benke <falk.benke@pik-potsdam.de>
Date: Thu, 5 Sep 2024 15:44:28 +0200
Subject: [PATCH] prepend page break to plots to avoid truncation

---
 R/showAreaAndBarPlots.R | 2 ++
 R/showLinePlots.R       | 1 +
 2 files changed, 3 insertions(+)

diff --git a/R/showAreaAndBarPlots.R b/R/showAreaAndBarPlots.R
index 3739476..bfdc91e 100644
--- a/R/showAreaAndBarPlots.R
+++ b/R/showAreaAndBarPlots.R
@@ -194,6 +194,8 @@ showAreaAndBarPlots <- function(
     }
   }
 
+  cat("\\clearpage")
+
   # Show plots.
   if (showNonMainRegs) {
     grid.arrange(p1, p2, p3, layout_matrix = rbind(c(1, 3), c(2, 3)), left = label)
diff --git a/R/showLinePlots.R b/R/showLinePlots.R
index 307b7e0..6094e78 100644
--- a/R/showLinePlots.R
+++ b/R/showLinePlots.R
@@ -158,6 +158,7 @@ showLinePlots <- function(
   }
 
   # Show plots.
+  cat("\\clearpage")
   grid.arrange(p1, p2, nrow = 1)
   cat("\n\n")