Handling backslashes lattice in xtable

Question

Ho una tabella che include la seguente colonna:

mytable <- data.frame(beta_0 = c(1,2,3) 

Quello che voglio fare è uscita una tabella con una colonna di markup lattice, ad esempio $\beta_0$

Tuttavia, non riesco a capire come per l'uscita del "$ \ beta_0 $" utilizzando print.xtable:

colnames(mytable) <- "$\beta_0$" 
library(xtable) 
print(xtable(mytable), include.rownames = F) 

restituisce una colonna di

\eta\_0\$ 

invece di

$\beta_0$ 

Suppongo che la risposta sia "sanitize.colnames.function" argum ent a print.xtable, ma non è ovvio come utilizzarlo, e ?print.xtable non fornisce esempi.

In particolare, desidero uscita una tabella lattice come:

\begin{table}[ht] 
\begin{center} 
    \begin{tabular}{r} 
    \hline 
    $\beta_0$ \\ 
    \hline 
    1.00 \\ 
    2.00 \\ 
    3.00 \\ 
    \hline 
    \end{tabular} 
\end{center} 
\end{table} 

Answer 1

Due problemi qui; in primo luogo, è necessario un doppio backslash perché altrimenti lo tratta come una sequenza di controllo. Secondo, per impostazione predefinita, xtable disinfetta il testo in modo che non si rompa LaTeX. Utilizzare uno dei parametri sanitize. per controllarlo; per non sanificare, passare la funzione di identità.

colnames(mytable) <- "$\\beta_0$" 
print(xtable(mytable), include.rownames = F, sanitize.colnames.function = identity)