experimenting auto_set_format
diff --git a/DESCRIPTION b/DESCRIPTION
index 9bf4782..f4eab25 100644
--- a/DESCRIPTION
+++ b/DESCRIPTION
@@ -1,7 +1,7 @@
Package: kableExtra
Type: Package
Title: Construct Complex Table with 'kable' and Pipe Syntax
-Version: 0.8.0
+Version: 0.8.0.0001
Authors@R: c(
person('Hao', 'Zhu', email = 'haozhu233@gmail.com', role = c('aut', 'cre'),
comment = c(ORCID = '0000-0002-3386-6076')),
diff --git a/R/auto_set_format.R b/R/auto_set_format.R
new file mode 100644
index 0000000..fbf657e
--- /dev/null
+++ b/R/auto_set_format.R
@@ -0,0 +1,7 @@
+auto_set_format <- function() {
+ if (knitr::is_latex_output()) {
+ options(knitr.table.format = "latex")
+ } else {
+ options(knitr.table.format = "html")
+ }
+}
diff --git a/R/zzz.R b/R/zzz.R
index 02f4487..982d9de 100644
--- a/R/zzz.R
+++ b/R/zzz.R
@@ -16,4 +16,6 @@
usepackage_latex("ulem", "normalem")
usepackage_latex("makecell")
}
+ auto_format <- getOption("kableExtra.auto_format", default = TRUE)
+ if (auto_format) auto_set_format()
}