Update table2office.R

tomwenseleers · Nov 14, 2022 · 2896d56 · 2896d56
1 parent 1afc8e2
commit 2896d56
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/table2office.R b/R/table2office.R
@@ -266,7 +266,7 @@ table2office = function(x = NULL, file = "Rtable", type = c("PPT","DOC"), append
   cell.width <- min(w, pagesize["width"] - offx)/(nc+1)
 
   if(inherits(tab,"xtable")){
-    tab <- xtable_to_flextable(tab, include.rownames = add.rownames, rowname_col = ".")
+    tab <- as_flextable(tab, include.rownames = add.rownames, rowname_col = ".")
     tab <- width(tab, width=cell.width)
     tab <- height(tab, height=cell.height)
   } else {