#!/usr/bin/env Rscript ########################################### my_label_size = 25 linPlots_combined = paste0(outdir_images , tolower(gene) ,"_linP_combined.svg") cat("\nOutput plot:", linPlots_combined) svg(linPlots_combined, width = 18, height = 12) cowplot::plot_grid( cowplot::plot_grid(lin_countP, lin_diversityP , nrow = 2 , labels = "AUTO" , label_size = my_label_size), NULL, linP_dm_om, nrow = 1, labels = c("", "", "C"), label_size = my_label_size, rel_widths = c(35, 3, 52) ) dev.off()