将矩阵从 R 保存到 .tex 表时包括希腊字母

将矩阵从 R 保存到 .tex 表时包括希腊字母

如何在 R 中保存包含希腊字母的表格,以便 LaTeX 在 LaTeX 中调用该表时识别并输出希腊字母?

我正在使用 R 输出结果表,*.tex使用 R 的print()命令将结果表保存为文件,然后将该结果表输入到我的较长的*.tex报告中。

正如您在下面的 R 代码中看到的,我想将希腊字母作为行标签,但我无法弄清楚。

R代码是:

table <- rbind(1:5, 6:10, 11:15, 16:20)

rownames(table) <- c("hat(beta)",
                     "hat(tau)",
                     "hat(sigma)_C",
                     "gamma")

colnames(table) <- c("Var1",
                     "Var2",
                     "Var3",
                     "Var4",
                     "Var5")

print(xtable(table), only.contents=TRUE, include.rownames=T, 
      include.colnames=T, floating=F,
      file = 'table.tex')

特克斯代码:

  \begin{tabular}{  l cc cc c   }
          \hline
     \input{table.tex} 
          \hline
        \end{tabular} 

答案1

我是在R末端而不是 tex 末端解决了这个问题。但为了便于将来参考,解决方案如下。

我在这里找到了必要的帮助: https://stackoverflow.com/questions/8732712/handling-latex-backslashes-in-xtable

R 中必要的步骤是使用双反斜杠和sanitize.colnames.function = identitysanitize.rownames.function = identity

colnames(table) <- "$\\beta_0$"
print(xtable(table), sanitize.colnames.function = identity)

我的示例中的更正代码如下:

table <- rbind(1:5, 6:10, 11:15, 16:20)

rownames(table) <- c("$\\hat{\\beta}$",
                     "$\\hat{\\tau}$",
                     "$\\hat{\\sigma}_C$",
                     "$\\gamma$")

colnames(table) <- c("Var1",
                     "Var2",
                     "Var3",
                     "Var4",
                     "Var5")

print(xtable(table), only.contents=TRUE, include.rownames=T, 
      include.colnames=T, floating=F, sanitize.rownames.function = identity
      file = 'table.tex')

相关内容