How to add caption with the tables r package?

问题:

Using the iris data, we make a table with the tables package:

library(tables)
table <- tabular( (Sepal.Length+Sepal.Width) ~
           Format(format(digits=2))*(mean + sd), data=iris )

With the Hmisc package, we would add the caption with the latex function like this:

latex(table, caption="My table")

But that does not work with the tables package, because it defines an S3 method, latex.tabular.

So I have tried this, following an example in the package vignette:

latex(table, options=list(toprule="\\caption{My table}"))

But it does not work, it says that caption is outside float. How can I correctly add caption with the latex.tabular function from the tables package?

回答1:

I figured out one way to do it and it is actually pretty easy: you just have to embed the tables package result inside the latex code.

Below one example with knitr, the << >>= is the r chunk code.

\begin{table}
\caption{My awesome table from tables package}
\begin{center}

<<cool multilevel table, results='asis', echo=FALSE>>=
latex(table)
@

\end{center}
\label{tab:mytable}
\end{table}

This generated this awesome table, now with title (in portuguese):