From b55315bccee7b789c7ebc44f9229799cfd103722 Mon Sep 17 00:00:00 2001 From: Christoph Urlacher Date: Wed, 5 Aug 2026 21:12:44 +0200 Subject: [PATCH] Fix ratio_comparison chart naming (include filter suffix) --- scripts/charts/combined_ratio_comparison.r | 6 ++++-- scripts/charts/combined_ratio_comparison_merged.r | 6 ++++-- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/scripts/charts/combined_ratio_comparison.r b/scripts/charts/combined_ratio_comparison.r index 4bec86b..57c468e 100644 --- a/scripts/charts/combined_ratio_comparison.r +++ b/scripts/charts/combined_ratio_comparison.r @@ -98,5 +98,7 @@ plot <- ggplot( plot.title = element_text(size = 14, face = "bold") ) -ggsave("injections/ratio_comparison.svg", plot = plot, width = 12, height = 8) -print("Saved ratio_comparison.svg") +suffix <- gsub("^resultsdata|\\.csv$", "", csv_suffix) +outfile <- paste0("injections/ratio_comparison", suffix, ".svg") +ggsave(outfile, plot = plot, width = 12, height = 8) +print(paste("Saved", outfile)) diff --git a/scripts/charts/combined_ratio_comparison_merged.r b/scripts/charts/combined_ratio_comparison_merged.r index 1df1531..d955d18 100644 --- a/scripts/charts/combined_ratio_comparison_merged.r +++ b/scripts/charts/combined_ratio_comparison_merged.r @@ -101,10 +101,12 @@ plot <- ggplot( plot.title = element_text(size = 14, face = "bold") ) +suffix <- gsub("^resultsdata|\\.csv$", "", csv_suffix) +outfile <- paste0("injections/ratio_comparison_merged_trap", suffix, ".svg") ggsave( - "injections/ratio_comparison_merged_trap.svg", + outfile, plot = plot, width = 12, height = 8 ) -print("Saved ratio_comparison_merged_trap.svg") +print(paste("Saved", outfile))