diff --git a/R/combine_cluster_plots_and_save.R b/R/combine_cluster_plots_and_save.R index ee93ff9bec493e9848240de41bcbd264bf0d4ae0..19f2458ecff1966cfb798213a426e9270971f845 100644 --- a/R/combine_cluster_plots_and_save.R +++ b/R/combine_cluster_plots_and_save.R @@ -22,7 +22,7 @@ combine_cluster_plots_and_save <- function(plot_list, cluster, out_path = path, plot_list[[3]] + theme(legend.position = "none"), ncol = 3, align = "hv") legend <- cowplot::get_legend(plot_list[[3]] + - guides(fill = guide_legend(nrow = 1)) + + # guides(fill = guide_legend(nrow = 1)) + theme(legend.position = "bottom")) title <- ggdraw() + draw_label(