experimenting auto_set_format
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")
+  }
+}