r - R/Sweave/Latex - テーブルにコメントを配置 (xtable)

Question

LaTeX で R と sweave を使用してテーブルを作成しました。スウィーブの例:

\documentclass{article}
\begin{document}
\SweaveOpts{concordance=TRUE}

<<label=tab1, echo=FALSE, results=tex>>=
library(xtable)
employee <- c('John Doe','Peter Gynn','Jolie Hope')
salary <- c(21000, 23400, 26800)
mData <- data.frame(employee, salary) 
print(xtable(mData, caption = "Salary", align="ccc"), caption.placement="top", hline.after = c(c(-1, 0), nrow(mData)), include.rownames=FALSE) 
@

\end{document}

テーブルの基本的な LaTeX 構造は次のとおりです。

\begin{table}
\begin{tabular}{cc}
...
\end{tabular}
\end{table}

多くの作業を省くために、R の print 関数と xtable 関数を使用して、LaTeX でテーブル コードを作成します。しかし、\end{tabular} ステートメントと \end{table} ステートメントの間にテキストを追加したいと思います。ステートメントは \end{tabular} の前にしか配置されないため、print 関数の add.to.row 引数は役に立ちません。どうすればこの問題を解決できますか?

ご協力いただきありがとうございます。