Fix ratio_comparison chart naming (include filter suffix)
This commit is contained in:
@@ -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))
|
||||
|
||||
Reference in New Issue
Block a user