r - 複数のテーブルに対する分割表

Question

次のようなテーブルがあります。

V1  V2  V3  V4  V5  V6  V7  V8  V9 V10
fve fve fve fve fve fve fve fve mdm mdm
mdm fve fve fve fve fve fve fve fve fve
fve fve fve fve fve fve fve fve fve fve
mdm fve fve fve fve fve fve fve fve fve
fve fve fve fve fve fve fve fve fve fve

そして、列1からの頻度をすべてに対してカウントし、次のようなものを取得したいと思います:

    fve mdm
fve 25  2
mdm 18  0

それは可能ですか？table()andを試してみましftable()たが、出力が期待したものと一致しません。

Answer 1

変更された質問の場合:

> tapply(unlist(dat[-1]), rep(dat[[1]], length(dat[-1])), table)
$fve

fve mdm 
 25   2 

$mdm

fve mdm 
 18   0 

do.call(rbind, ...) これらの値を実行して、目的のテーブルを取得できると思います。