Merge pull request #789 from haozhu233/centering_fix

Fix centering of three part table.
haozhu233 · Dec 4, 2023 · d3e7953 · d3e7953
2 parents 9cfbb7c + 81ec2fe
commit d3e7953
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/R/kable_styling.R b/R/kable_styling.R
@@ -558,15 +558,16 @@ styling_latex_position <- function(x, table_info, position, latex_options,
 
 styling_latex_position_center <- function(x, table_info, hold_position,
                                           table.envir) {
-  if (!table_info$table_env & table_info$tabular == "tabular") {
+  if (!table_info$table_env && table_info$tabular == "tabular") {
     x <- paste0("\\begin{", table.envir, "}\n\\centering", x,
                 "\n\\end{", table.envir, "}")
     if (hold_position == "hold_position") {
       x <- styling_latex_hold_position(x)
     } else if(hold_position == "HOLD_position") {
       x <- styling_latex_HOLD_position(x)
     }
-  }
+  } else if (table_info$table_env)
+    x <- sub("^\\\\begin\\{table}", "\\\\begin{table}\n\\\\centering", x)
   return(x)
 }
 

diff --git a/inst/NEWS.md b/inst/NEWS.md
@@ -8,6 +8,7 @@ should be supported.
 * cell_spec() colors like "darkgoldenrod2" weren't 
 shown (issue #726).
 * placement of collapsed row labels was incorrect (issue #719).
+* centering of three part table wasn't working (issue #692)