figures: diff layout for rgi figs

workflow_figures/scripts/fig_rgi.R

@@ -60,14 +60,14 @@ for(sname in names(TABS)){
 }
 
 # combine plots
-FIGS_ALL_c <- Reduce("+", FIGS_c) + plot_layout(ncol=2)
-FIGS_ALL_o <- Reduce("+", FIGS_o) + plot_layout(ncol=2)
+FIGS_ALL_c <- Reduce("+", FIGS_c) + plot_layout(ncol=3)
+FIGS_ALL_o <- Reduce("+", FIGS_o) + plot_layout(ncol=3)
 
 # PDF
-pdf(snakemake@output$pdf_c, width=20, height=14)
+pdf(snakemake@output$pdf_c, width=30, height=7)
 print(FIGS_ALL_c)
 dev.off()
 
-pdf(snakemake@output$pdf_o, width=20, height=14)
+pdf(snakemake@output$pdf_o, width=30, height=7)
 print(FIGS_ALL_o)
 dev.off()
\ No newline at end of file