commit bdc59baf2e7c511f41451616172705c95c2539c0
author Hao Zhu <haozhu233@gmail.com> Thu Apr 05 14:24:56 2018 -0400
committer Hao Zhu <haozhu233@gmail.com> Thu Apr 05 14:24:56 2018 -0400
tree 274312ec808f6b104f512c2533ce1f0fc3b7e68d
parent ee20ec0c9dc2765675581e7f5e9838ac88c435a9

#161

R/util.R

diff --git a/R/util.R b/R/util.R
index 75efb12..3f8237a 100644
--- a/R/util.R
+++ b/R/util.R
@@ -123,7 +123,9 @@
   for (i in which(dup_index != 1)) {
     dup_row <- table_info$contents[i]
     empty_times <- dup_index[i] - 1
-    new_row <- paste0(dup_row, "\\\\vphantom\\{", empty_times, "\\}")
+    new_row <- str_replace(
+      dup_row, "&",
+      paste0("& \\\\\\\\vphantom\\\\{", empty_times, "\\\\}"))
     kable_input <- str_replace(kable_input, dup_row, new_row)
     table_info$contents[i] <- new_row
   }