R：如何通过xtable在表格中设置位置选项？

使用xtable可以生成以下代码

  \documentclass{article}

  \begin{document}

  <<>>=
  myData <- matrix(c(1,2,3,11,12,13,111,222,33),ncol=3,byrow=TRUE)
  colnames(myData) <- c("A","B","C")
  @

  <<echo=FALSE>>=
  library("xtable")
  xt <- xtable(myData, align="|l|r|r|r|", digits=0)

  out <- print(xt, print.results = FALSE, floating = FALSE)
  @

  \end{document}

但我需要以下几点

\begin{tabular}[t]{|l|r|r|r|}

因为我想把这个表格换成另一个表格

---

有没有一种方法可以使用xtable生成此可选位置代码？

由于您有一个文本，因此，您可以使用正则表达式将

[t]

插入

输出

例如，使用如下内容：

outf<-gsub("(tabular}{+)", "tabular}[t]{", out, perl=TRUE)

那没关系。但我尽量避免这些“正则表达式黑客”。
outf<-gsub("(tabular}{+)", "tabular}[t]{", out, perl=TRUE)

> cat(outf)
% latex table generated in R 3.2.0 by xtable 1.7-4 package
% 
\begin{tabular}[t]{|l|r|r|r|}
  \hline
 & A & B & C \\ 
  \hline
1 & 1 & 2 & 3 \\ 
  2 & 11 & 12 & 13 \\ 
  3 & 111 & 222 & 33 \\ 
   \hline
\end{tabular}