r - 「テーブル」パッケージ: 変数のサブセットの列のパーセンテージを取得する方法は?

Question

下の表の「パーセント」という名前の列は、列の合計パーセントを示しています。「vs」の各レベル内の「am」の各レベルの列パーセントを表示するにはどうすればよいですか?

これは私が持っているものです:

これは私が探しているものです：

以下のニットチャンク：

<<echo=FALSE,results='asis'>>=
# 
# library(tables)
# library(Hmisc)
# library(Formula)

## This gives me column percentages for the total table.
latex(  tabular(  Factor(vs)*Factor(am)  ~  gear*Percent("col"),    data=mtcars )     )

## I am trying to get column percentages for each level of "vs"

@