From 3431af23b7c83a5f2abf89813d0b01aab52790e5 Mon Sep 17 00:00:00 2001
From: Simeon <51403284+simeross@users.noreply.github.com>
Date: Thu, 2 Nov 2023 10:25:49 +0100
Subject: [PATCH] Update combine_cluster_plots_and_save.R
---
R/combine_cluster_plots_and_save.R | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/R/combine_cluster_plots_and_save.R b/R/combine_cluster_plots_and_save.R
index 19f2458..10284e7 100644
--- a/R/combine_cluster_plots_and_save.R
+++ b/R/combine_cluster_plots_and_save.R
@@ -20,7 +20,7 @@ combine_cluster_plots_and_save <- function(plot_list, cluster, out_path = path,
combo_pl <- cowplot::plot_grid(plot_list[[1]] + theme(legend.position = "none"),
plot_list[[2]] + theme(legend.position = "none"),
plot_list[[3]] + theme(legend.position = "none"),
- ncol = 3, align = "hv")
+ ncol = 3, align = "h")
legend <- cowplot::get_legend(plot_list[[3]] +
# guides(fill = guide_legend(nrow = 1)) +
theme(legend.position = "bottom"))
--
GitLab