Hmisc中describe函数的latex表

Question

我一直试图通过在Hmisc中请求的函数之前添加latex(describe)或latex(xtable)来获得下表的latex输出，但这不起作用。你知道错误在哪里吗？

<<echo=FALSE, message=FALSE>>=
library(Hmisc)
library(MMST)
require(xtable)
data(wine)
attach(wine)
@  

<<echo=TRUE, message=TRUE>>=
describe(wine[c("Alcohol", "MalicAcid", "Ash", "AlcAsh", 
"Mg", "Phenols", "Flav", "NonFlavPhenols","Proa" ,"Color","Hue","OD", "Proline",
"classdigit", "class")], descript='Descriptive Statistics', file = '')
@

Answer 1

尝试这样输出latex：

> d <- describe(head(wine), descript = "Descriptive Statistics")
> latex(d, file = '')
\begin{spacing}{0.7}
\begin{center}\textbf{ Descriptive Statistics \\ 15 Variables~~~~~ 6 ~Observations}\end{center}
\smallskip\hrule\smallskip{\small
\vbox{\noindent\textbf{Alcohol}
etc.