From b2eb26b1fc78cb391de2a5050aa453b6143d4765 Mon Sep 17 00:00:00 2001
From: Simeon <51403284+simeross@users.noreply.github.com>
Date: Fri, 27 Oct 2023 14:27:47 +0200
Subject: [PATCH] Update combine_cluster_plots_and_save.R

---
 R/combine_cluster_plots_and_save.R | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/R/combine_cluster_plots_and_save.R b/R/combine_cluster_plots_and_save.R
index b8afff0..828a595 100644
--- a/R/combine_cluster_plots_and_save.R
+++ b/R/combine_cluster_plots_and_save.R
@@ -24,6 +24,6 @@ combine_cluster_plots_and_save <- function(plot_list, cluster, out_path = path,
                                              ncol = 1, rel_heights = c(1, .1)) +
     ggtitle(paste("Cluster:", cluster))
   ggsave(file.path(out_path, paste0("Cluster_overview_", cluster, ".pdf")),
-         combo_pl, width = w, height = h, units = "cm")
-  return(combo_pl)
+         combo_pl_with_legend, width = w, height = h, units = "cm")
+  return(combo_pl_with_legend)
 }
-- 
GitLab