From 9728b8115c122195e8f2808fb55d7eb0860d6314 Mon Sep 17 00:00:00 2001 From: Melkiades Date: Wed, 10 Jul 2024 16:48:17 +0200 Subject: [PATCH] case where new folder is needed --- package/tests/testthat/helper.R | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/package/tests/testthat/helper.R b/package/tests/testthat/helper.R index 0a7351771e..3afbb520be 100644 --- a/package/tests/testthat/helper.R +++ b/package/tests/testthat/helper.R @@ -44,7 +44,10 @@ test_article <- function(article_path) { withr::with_seed( 123, suppressMessages( - ggplot2::ggsave(plot_file, data_snap[[i]], width = plot_dims[["width"]], height = plot_dims[["height"]]) + ggplot2::ggsave(plot_file, data_snap[[i]], + width = plot_dims[["width"]], height = plot_dims[["height"]], + create.dir = TRUE + ) ) )