R和Latex使用xtable与基线对齐

我使用knitr/swave动态生成R代码，并将其包含到latex文档中。我有一个最低限度的代码：

list <- c("Bike",  "Train", "Bike",  "Bike",  "Bike",  "Train", "Bike",  "Bike", "Bike",  "Moped", "Bus",   "Moped", "Train", "Bus", "Moped", "Bike","Moped")

library(xtable)
print(xtable(table(list)),floating=FALSE,booktabs=TRUE)

我想要的是将表格环境与基线顶部对齐，即.\begin{tabular}[t]{rr}…\end{tabular}

浏览xtable文档时，会发现table.placement，但这会引入一个表环境。我尝试了tabular.environment并将其设置为tabular[t]，但没有按照它给出的\begin{tabular[t]}工作

如何解决此问题？

xtable包不支持添加可选参数，但您可以通过编辑结果自行添加。比如说,

列表\开始{表格}[t]{rr} >\t规则 >&列表\\ >\midrule >自行车&8\\ >总线和2\\ >四辆轻便摩托车 >列车&3\\ >\bottomrule >\end{tabular}

---

非常感谢。有趣的是，这样一个选项缺失了。

\begin{tabular}{rr}
  \toprule
 & list \\ 
  \midrule
Bike &   8 \\ 
  Bus &   2 \\ 
  Moped &   4 \\ 
  Train &   3 \\ 
   \bottomrule
\end{tabular}