Count entries in a factor
Arguments
- f
A factor (or character vector).
- sort
If
TRUE, sort the result so that the most common values float to the top.- prop
If
TRUE, compute the fraction of marginal table.
Examples
f <- factor(sample(letters)[rpois(1000, 10)])
table(f)
#> f
#> a c f g h i j k m n o q s t u v w x
#> 1 16 8 21 1 63 3 37 5 110 54 115 11 69 118 5 85 129
#> y z
#> 96 53
fct_count(f)
#> # A tibble: 20 × 2
#> f n
#> <fct> <int>
#> 1 a 1
#> 2 c 16
#> 3 f 8
#> 4 g 21
#> 5 h 1
#> 6 i 63
#> 7 j 3
#> 8 k 37
#> 9 m 5
#> 10 n 110
#> 11 o 54
#> 12 q 115
#> 13 s 11
#> 14 t 69
#> 15 u 118
#> 16 v 5
#> 17 w 85
#> 18 x 129
#> 19 y 96
#> 20 z 53
fct_count(f, sort = TRUE)
#> # A tibble: 20 × 2
#> f n
#> <fct> <int>
#> 1 x 129
#> 2 u 118
#> 3 q 115
#> 4 n 110
#> 5 y 96
#> 6 w 85
#> 7 t 69
#> 8 i 63
#> 9 o 54
#> 10 z 53
#> 11 k 37
#> 12 g 21
#> 13 c 16
#> 14 s 11
#> 15 f 8
#> 16 m 5
#> 17 v 5
#> 18 j 3
#> 19 a 1
#> 20 h 1
fct_count(f, sort = TRUE, prop = TRUE)
#> # A tibble: 20 × 3
#> f n p
#> <fct> <int> <dbl>
#> 1 x 129 0.129
#> 2 u 118 0.118
#> 3 q 115 0.115
#> 4 n 110 0.11
#> 5 y 96 0.096
#> 6 w 85 0.085
#> 7 t 69 0.069
#> 8 i 63 0.063
#> 9 o 54 0.054
#> 10 z 53 0.053
#> 11 k 37 0.037
#> 12 g 21 0.021
#> 13 c 16 0.016
#> 14 s 11 0.011
#> 15 f 8 0.008
#> 16 m 5 0.005
#> 17 v 5 0.005
#> 18 j 3 0.003
#> 19 a 1 0.001
#> 20 h 1 0.001