commit 86692139f5a2db5967975154056ff041cf110859
author bsalzer <34398531+bsalzer@users.noreply.github.com> Tue Feb 13 19:50:05 2018 -0500
committer GitHub <noreply@github.com> Tue Feb 13 19:50:05 2018 -0500
tree 8e09c99a8dfe5449216ec51c3f1031e72c1953e8
parent 8f49eb6d43be8ca91bc12e3ca2052aba4acb3cfa

Update kable_styling.R

add more escape values so feature will work correctly in latex.

R/kable_styling.R

diff --git a/R/kable_styling.R b/R/kable_styling.R
index cd996a8..40498e5 100644
--- a/R/kable_styling.R
+++ b/R/kable_styling.R
@@ -261,12 +261,12 @@
 
     if(table_info$tabular=="longtable") {
       out <- sub("\\\\begin\\{longtable\\}\\{l",
-                 paste0("\\begin\\{longtable\\}\\{",
+                 paste0("\\\\begin\\{longtable\\}\\{",
                         row_label_orientation),
                  out)
     } else {
       out <- sub("\\\\begin\\{tabular\\}\\{l",
-                 paste0("\\begin\\{tabular\\}\\{",
+                 paste0("\\\\begin\\{tabular\\}\\{",
                         row_label_orientation),
                  out)
     }