bug fixed: https://stackoverflow.com/questions/44360040/group-rows-function-in-kableextra-package-not-grouping-rows
diff --git a/R/magic_mirror.R b/R/magic_mirror.R
index 2e415f7..7a274bc 100644
--- a/R/magic_mirror.R
+++ b/R/magic_mirror.R
@@ -70,6 +70,7 @@
     )
   # Contents
   kable_info$contents <- str_match_all(kable_input, "\n(.*)\\\\\\\\")[[1]][,2]
+  kable_info$contents <- sub("\\\\", "\\\\\\\\", kable_info$contents)
   if (kable_info$tabular == "longtable" & !is.na(kable_info$caption)) {
     kable_info$contents <- kable_info$contents[-1]
   }