r - 基于tableby打印tex表

Question

我正在尝试打印以 R 格式格式化的表格。虽然它在 R 中看起来不错，但一旦我尝试输出它，所有反斜杠都被格式化为 $\backslash$，所有波浪线都被格式化为“~{}”。有没有办法规避这种行为？

附上，你会发现一个 MWE。

谢谢

丹尼尔

    loadpackage <- function(x){
  for( i in x ){
    #  require returns TRUE invisibly if it was able to load package
    if( ! require( i , character.only = TRUE ) ){
      #  If package was not able to be loaded then re-install
      install.packages( i , dependencies = TRUE )
    }
    #  Load package (after installing)
    library( i , character.only = TRUE )
  }
}


loadpackage( c("msm", "lmeInfo", "data.table", "pastecs", "descr", "arsenal", "dplyr", "data.table",
               "sjstats", "lme4", "binsreg", "xtable","stargazer","reshape2","foreign",
               "haven", "tidyverse", "plyr", "stringr", "eeptools", "factoextra", "naniar", "knitr", "survival",
               "expss") )


data(mockstudy)
tab1 <- tableby(arm ~ sex + age, data=mockstudy)
summary(tab1, text="latex")

test <- xtable(as.data.frame(summary(tab1, text = "latex")))
test

rest.table <- xtable(test, caption = "Sample restrictions and size")

print(rest.table, file = str_c(tables.path, "/summary.tex"))

标签： rdatatableformattingtex