r - R パッケージの要約関数

Question

サンプルデータは次のとおりです。

a <- structure(list(Occ = c(1, 2, 3, 4, 4, 5, 6, 4, 8, 5), 
Type = c("A", "B", "C", "A", "A", "A", "B", "C", "C", "B"), 
Alc = c("A", "B", "N", "A", "N", "N", "N", "A", "B", "B"), 
Count = c(10, 10, 20, 10, 15, 15, 10, 10, 20, 15)),
.Names = c("Occ", "Type", "Alc", "Count"), row.names = c(NA, -10L), class = "data.frame")

次のように、列の各属性の頻度カウントを取得したい:

Occ:    Type    Alc     Count
1: 1    A: 4    A: 3    10: 5
2: 1    B: 3    B: 3    15: 3   
3: 1    C: 3    N: 4    20: 2
4: 3
5: 2
6: 1
8: 1

この問題は、「anacor」パッケージの「summary」機能によって部分的に解決できます。私はまだより良い解決策を探しています。

Answer 1

次のように、おそらくtableの要素で使用しaます

> lapply(a, table)
$Occ

1 2 3 4 5 6 8 
1 1 1 3 2 1 1 

$Type

A B C 
4 3 3 

$Alc

A B N 
3 3 4 

$Count

10 15 20 
 5  3  2