Question

是否可以在xtable中使用标题对齐，这与表格其余部分中使用的对齐方式不同？在我的情况下，我希望我的标题居中对齐，但表格本身应该是右对齐的。

Answer 1

要在LaTeX中执行此操作，您可以将标题添加到\multicolumn内，以指定所需的对齐方式：

\begin{tabular}{rrr}
  \hline
 & \multicolumn{1}{c}{x} &\multicolumn{1}{c}{y} \\ 
  \hline
1 &   1 & 0.17 \\ 
  2 &   2 & 0.63 \\ 
  3 &   3 & 0.95 \\ 
  4 &   4 & 0.57 \\ 
  5 &   5 & 0.65 \\ 
   \hline
\end{tabular}

print.xtable函数使用xtable对象的名称作为标题。因此，如果您重命名xtable对象：

> d=data.frame(x=1:5,y=runif(5))  # sample data frame
> dx=xtable(d) # make an xtable
> names(dx)=c("\\multicolumn{1}{c}{x}","\\multicolumn{1}{c}{y}")

然后这就完成了大部分工作，你只需打印它就会覆盖print.xtable的清理功能：

> print.xtable(dx,sanitize.colnames.function=function(x){x})
% latex table generated in R 2.15.1 by xtable 1.7-0 package
% Thu Feb 21 15:28:11 2013
\begin{table}[ht]
\begin{center}
\begin{tabular}{rrr}
  \hline
 & \multicolumn{1}{c}{x} & \multicolumn{1}{c}{y} \\ 
  \hline
1 &   1 & 0.78 \\ 
  2 &   2 & 0.34 \\ 
  3 &   3 & 0.88 \\ 
  4 &   4 & 0.45 \\ 
  5 &   5 & 0.54 \\ 
   \hline
\end{tabular}
\end{center}
\end{table}

否则确实

& $\backslash$multicolumn\{1\}\{c\}\{x\} & $\backslash$multicolumn\{1\}\{c\}\{y\} \\

怎么样？

Answer 2

只是为了跟进Spacedman的答案（由于我无声无法添加评论;）

而不是sanitize.colnames.function=function(x){x}，你可以这样做：

sanitize.colnames.function=function(x){paste0("\\multicolumn{1}{c}{",x,"}")}

这样您就可以跳过重命名步骤。如果您要/想要做其他标题“美化”，则应在paste0之前或逗号之间（如果短）完成

xtable和标题对齐

2 个答案: