Applying table() to each column of a matrix
head(df)
v1 v2 v3 v4 v5 v6 v7 v8 v9 v10 v11 v12 v13 v14 v15 v16 v17 v18 v19 v20
1 1 1 3 2 1 5 1 3 9 3 3 8 12 7 3 13 9 14 16 11
2 1 2 1 4 4 2 1 5 7 5 5 8 11 8 8 12 13 17 18 14
3 1 1 3 1 4 2 6 8 1 4 3 9 12 14 1 16 6 13 9 5
4 1 1 3 3 5 5 6 1 5 9 11 9 1 12 4 11 1 16 1 1
5 1 2 3 3 2 1 6 2 3 6 10 10 9 14 3 6 17 4 13 7
6 1 2 3 4 1 2 1 8 3 1 3 9 13 14 3 16 14 16 7 16
head(df)
df
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
699 511 435 368 324 264 207 195 163 146 157 128 102 74 68 72 38 24 16 9
apply(df, 2, table)$v1
1
200
$v2
1 2
106 94
$v3
1 2 3
58 69 73
$v4
1 2 3 4
48 59 40 53
$v5
1 2 3 4 5
37 33 36 49 45
$v6
1 2 3 4 5 6
31 35 32 35 28 39
$v7
1 2 3 4 5 6 7
28 28 19 26 34 36 29
$v8
1 2 3 4 5 6 7 8
18 32 29 21 26 27 23 24
$v9
1 2 3 4 5 6 7 8 9
24 21 26 24 23 20 17 23 22
$v10
1 2 3 4 5 6 7 8 9 10
16 19 22 23 24 16 21 28 14 17
$v11
1 2 3 4 5 6 7 8 9 10 11
15 18 20 25 18 17 17 18 16 21 15
$v12
1 2 3 4 5 6 7 8 9 10 11 12
11 16 20 13 25 16 18 18 16 13 17 17
$v13
1 2 3 4 5 6 7 8 9 10 11 12 13
16 10 21 17 13 15 14 14 14 12 20 12 22
$v14
1 2 3 4 5 6 7 8 9 10 11 12 13 14
16 12 18 7 14 10 8 15 14 10 20 17 17 22
$v15
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
20 7 15 17 19 15 15 13 12 9 12 13 11 8 14
$v16
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16
15 13 13 12 7 10 9 11 9 15 17 11 11 10 15 22
$v17
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
9 7 16 7 17 12 10 8 16 12 14 14 10 9 13 14 12
$v18
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18
8 13 15 15 11 17 9 7 8 11 14 11 13 8 9 11 9 11
$v19
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
12 17 8 11 9 7 12 11 14 10 16 16 9 9 6 12 8 3 10
$v20
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
11 8 12 13 11 7 5 5 8 16 12 17 9 8 11 13 9 10 6 9
|
|