nf wplot_save_pheatmap auto plotsize

vertesy · Jun 21, 2024 · 40e2df6 · 40e2df6
1 parent fc3bfba
commit 40e2df6
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/R/MarkdownReports.R b/R/MarkdownReports.R
@@ -429,8 +429,8 @@ wplot_save_this <- function(plotname = ww.autoPlotName(),
 wplot_save_pheatmap <- function(x,
                                 suffix = "heatmap",
                                 plotname = substitute(x),
-                                width = 15,
-                                height = width,
+                                width = nrow(x)+4,
+                                height = ncols(x)+4,
                                 pdf = TRUE,
                                 png = FALSE,
                                 png_res = 100, # NA

diff --git a/man/wplot_save_pheatmap.Rd b/man/wplot_save_pheatmap.Rd