From e1e4215c8339b7554d8b1b0cf627f5a59832fced Mon Sep 17 00:00:00 2001
From: GuyliannEngels <guyliann.engels@umons.ac.be>
Date: Mon, 10 Jun 2024 12:21:24 +0200
Subject: [PATCH] add colformat_sci() to tabularise_default.data.frame()

---
 R/tabularise_default.R | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/R/tabularise_default.R b/R/tabularise_default.R
index a0b128a..5adc561 100644
--- a/R/tabularise_default.R
+++ b/R/tabularise_default.R
@@ -103,10 +103,11 @@ tabularise_default.data.frame <- function(data, formula = NULL,
   if (isTRUE(auto.labs)) {
     align(res, align = "center", part = "header") |>
       valign(valign = "bottom", part = "header") |>
-      autofit()
+      autofit() -> res
   } else {
-    autofit(res)
+    res <- autofit(res)
   }
+  colformat_sci(res)
 }
 
 #' @export