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",