How can I use a table generated by R in LaTeX?

Since you are generating the table from R, I'll assume that you are using R's xtable package to generate the table. This package has some deficiencies, but it is still quite usable.

Here's a sample R session showing how to use the package.

R-session

data(tli)
## Demonstrate aov
 ## Taken from help(aov) in R 1.1.1
 ## From Venables and Ripley (1997) p.210.
 N <- c(0,1,0,1,1,1,0,0,0,1,1,0,1,1,0,0,1,0,1,0,1,1,0,0)
 P <- c(1,1,0,0,0,1,0,1,1,1,0,0,0,1,0,1,1,0,0,1,0,1,1,0)
 K <- c(1,0,0,1,0,1,1,0,0,1,0,1,0,1,1,0,0,0,1,1,1,0,1,0)
 yield <- c(49.5,62.8,46.8,57.0,59.8,58.5,55.5,56.0,62.8,55.8,69.5,55.0,
+            62.0,48.8,45.5,44.2,52.0,51.5,49.8,48.8,57.2,59.0,53.2,56.0)
 npk <- data.frame(block=gl(6,4), N=factor(N), P=factor(P), K=factor(K), yield=yield)
 npk.aov <- aov(yield ~ block + N*P*K, npk)
 op <- options(contrasts=c("contr.helmert", "contr.treatment"))
 npk.aovE <- aov(yield ~  N*P*K + Error(block), npk)
 options(op)

Using xtable to produce the table

## Standard xtable use
print(xtable(summary(npk.aov)))

% latex table generated in R 2.12.2 by xtable 1.5-6 package
% Fri Aug 12 16:00:48 2011
\begin{table}[ht]
\begin{center}
\begin{tabular}{lrrrrr}
  \hline
 & Df & Sum Sq & Mean Sq & F value & Pr($>$F) \\ 
  \hline
block       & 5 & 343.29 & 68.66 & 4.45 & 0.0159 \\ 
  N           & 1 & 189.28 & 189.28 & 12.26 & 0.0044 \\ 
  P           & 1 & 8.40 & 8.40 & 0.54 & 0.4749 \\ 
  K           & 1 & 95.20 & 95.20 & 6.17 & 0.0288 \\ 
  N:P         & 1 & 21.28 & 21.28 & 1.38 & 0.2632 \\ 
  N:K         & 1 & 33.13 & 33.13 & 2.15 & 0.1686 \\ 
  P:K         & 1 & 0.48 & 0.48 & 0.03 & 0.8628 \\ 
  Residuals   & 12 & 185.29 & 15.44 &  &  \\ 
   \hline
\end{tabular}
\end{center}
\end{table}

The output of this command is a fragment of LaTeX code, not a complete working document. It is designed to be cut and pasted into an existing LaTeX document. This is why you got the error that you got. Minimally, the document should look like the following:

\documentclass{article}
\begin{document}
...
\end{document}

And you would insert your table code in the ... spot. You then compile this with pdflatex.

This produces the following table:

output of code

Problems with the standard xtable output

There are a number of problems with the standard xtable output.

  1. It generates a floating {table} environment
  2. It encloses the tabular in a {center} environment
  3. It uses standard \hline as a separator

Although the floating table environment is useful when you are including the table into a larger LaTeX document, if you are generating a single table, it's not necessary. Furthermore, as a consequence of the floating environment, xtable encloses the table in a {center} environment, which leaves too much extra space between the table and other elements of your document. Finally, it uses \hline for the table rules, which leads to a cramped looking table.

Most of these problems are solvable, although with some loss of auto-generation.

The first two problems are connected. The print.xtable function has two arguments, one to say whether the table should be floating or not, and another to define the environment to wrap the table in. So we can modify our initial command to print the table in the following way to suppress both of these:

## Revised R print command
print(xtable(summary(npk.aov)),floating=FALSE,latex.environments=NULL)

This produces the following LaTeX code:

% latex table generated in R 2.12.2 by xtable 1.5-6 package
% Fri Aug 12 16:29:29 2011
\begin{tabular}{lrrrrr}
  \hline
 & Df & Sum Sq & Mean Sq & F value & Pr($>$F) \\ 
  \hline
block       & 5 & 343.29 & 68.66 & 4.45 & 0.0159 \\ 
  N           & 1 & 189.28 & 189.28 & 12.26 & 0.0044 \\ 
  P           & 1 & 8.40 & 8.40 & 0.54 & 0.4749 \\ 
  K           & 1 & 95.20 & 95.20 & 6.17 & 0.0288 \\ 
  N:P         & 1 & 21.28 & 21.28 & 1.38 & 0.2632 \\ 
  N:K         & 1 & 33.13 & 33.13 & 2.15 & 0.1686 \\ 
  P:K         & 1 & 0.48 & 0.48 & 0.03 & 0.8628 \\ 
  Residuals   & 12 & 185.29 & 15.44 &  &  \\ 
   \hline
\end{tabular}

If you have need for the table to float, then you should eliminate the floating=FALSE argument from the command, but leave the latex.environments=NULL.

However, this still leaves us with the cramped looking table.

Using booktabs to produce the table

The gold standard for high quality tables is the booktabs package, and xtable provides a boolean to do exactly that.

Final R print command

print(xtable(summary(npk.aov)),floating=FALSE,latex.environments=NULL,booktabs=TRUE)

This produces the following, much nicer table: (you need to add \usepackage{booktabs} to the preamble of your LaTeX document.)

enter image description here

If you want the table to float, (because you are including it in a larger LaTeX document, the you should eliminate the floating=FALSE argument, and add latex.environments=NULL). In your LaTeX source, you will need to manually add \centering right after \begin{table} to center the table.


Here is an alternative approach using the latex function from Hmisc. On the one hand, it only does matrices and data frames; on the other hand, it natively knows about booktabs, is impressively tweakable either directly or via its subroutine format.df, and ships with the standard installation. Using the same npk.aov example as Alan Munn did, I can produce roughly the same table using

> latex(summary(npk.aov)[[1]], cdec=c(0,2,2,2,4), na.blank=TRUE,
        booktabs=TRUE, table.env=FALSE, center="none", file="", title="")

which outputs

% latex.default(summary(npk.aov)[[1]], cdec = c(0, 2, 2, 2, 4),      na.blank = TRUE, booktabs = TRUE, table.env = FALSE, center = "none",      file = "", title = "") 
%
\begin{tabular}{lrrrrr}
\toprule
\multicolumn{1}{l}{}&\multicolumn{1}{c}{Df}&\multicolumn{1}{c}{Sum Sq}&\multicolumn{1}{c}{Mean Sq}&\multicolumn{1}{c}{F value}&\multicolumn{1}{c}{Pr(\textgreater F)}\tabularnewline
\midrule
block      &$ 5$&$343.29$&$ 68.66$&$ 4.45$&$0.0159$\tabularnewline
N          &$ 1$&$189.28$&$189.28$&$12.26$&$0.0044$\tabularnewline
P          &$ 1$&$  8.40$&$  8.40$&$ 0.54$&$0.4749$\tabularnewline
K          &$ 1$&$ 95.20$&$ 95.20$&$ 6.17$&$0.0288$\tabularnewline
N:P        &$ 1$&$ 21.28$&$ 21.28$&$ 1.38$&$0.2632$\tabularnewline
N:K        &$ 1$&$ 33.13$&$ 33.13$&$ 2.15$&$0.1686$\tabularnewline
P:K        &$ 1$&$  0.48$&$  0.48$&$ 0.03$&$0.8628$\tabularnewline
Residuals  &$12$&$185.29$&$ 15.44$&$$&$$\tabularnewline
\bottomrule
\end{tabular}

which renders very nearly the same as what Alan got:

formatted table

A possibly-significant change is that it wraps all the numbers in math mode, which may or may not be what you want.


A old question about how to use a R output in LaTeX and nobody mention Sweave/knitr?

Solution: You do not need to deal directly with the LaTeX chunk generated by R, just write a complete LaTeX document. As explained, this mean start with ...

\documentclass{someclass}
 % maybe the next R and LaTeX  code will need some preamble here  
\begin{document} 
Some text ... 

and end the document with, well ...

\end{document}

Now save it with the .Rnw (R noweb) extension, and inside it write the R code to generate that table delimited between two lines with <<>>= or <<name,options>>= and @. Then you can use the R functions Sweave or the newer knitr to convert the .Rnw file in a true .tex file with the R ouptut (not the R code), and then compile the .tex file with pdflatex or another TeX engine to produce the .pdf file). The easy way to do both file conversions is use the Rstudio Compile PDF button while editing the .Rnw file.

Note: not only xtable package is able to do a LaTex table: at least you can use also knitr itself, that have the kable function (with kableExtra could look also a decent table) as well as the packages stargazer and Hmisc.

A little comparison in this little example.Rnw file using knitr(*).

(*) You cannot compile this example "as is" with Sweave because some ot the R chunks options as well as the kable function are specific of knitr. Using Rstudio you can switch from using Sweave to knitr in Tools > Global Options > Sweave > Weave Rnw files using: Sweave (change it to knitr).

mwe

\documentclass{article}
\usepackage[margin=1em,paperheight=8cm,paperwidth=12cm]{geometry}  
\usepackage{booktabs,lipsum}
\begin{document}
<<echo=F,message=F,warning=F,comment="">>=
library(xtable)
library(stargazer)
library(kableExtra) 
library(Hmisc) 
data("mtcars")  # some example data 
df <-mtcars[1:3, 1:6]
@

<<echo=F,results="asis">>=
print(xtable(df,caption="Example with \\texttt{xtable}"), 
booktabs=T, caption.placement="top")
stargazer(df, summary=F, 
title="Example with \\texttt{stargazer}")
kable(df, booktabs = T, 
caption = "Example with  \\texttt{kable}  and \\texttt{kableExtra}")
latex(df, file = '', caption="Example with  \\texttt{Hmisc}")
@
\end{document}

Tags:

R

Tables