replace threeparttable with threeparttablex;
Fixed #119
diff --git a/R/footnote.R b/R/footnote.R
index 9225ebf..0d1b3be 100644
--- a/R/footnote.R
+++ b/R/footnote.R
@@ -205,7 +205,7 @@
table_info$ncol, threeparttable)
if (threeparttable) {
out <- sub(paste0("\\\\begin\\{", table_info$tabular, "\\}"),
- paste0("\\\\begin{threeparttable}\n\\\\begin{",
+ paste0("\\\\begin{ThreePartTable}\n\\\\begin{",
table_info$tabular, "}"),
out)
out <- sub(table_info$end_tabular,
@@ -213,7 +213,7 @@
"}\n\\\\begin{tablenotes}",
ifelse(footnote_as_chunk, "[para]", ""),
"\n\\\\small\n", footnote_text,
- "\n\\\\end{tablenotes}\n\\\\end{threeparttable}"),
+ "\n\\\\end{tablenotes}\n\\\\end{ThreePartTable}"),
out)
} else if (table_info$booktabs) {
out <- sub("\\\\bottomrule",