FR: allow more printing formatting for frq about sjmisc HOT 1 CLOSED

library(sjmisc)
library(dplyr)
#> 
#> Attaching package: 'dplyr'
#> The following objects are masked from 'package:stats':
#> 
#>     filter, lag
#> The following objects are masked from 'package:base':
#> 
#>     intersect, setdiff, setequal, union

data(efc)
frq(efc$e42dep)
#> elder's dependency (x) <numeric> 
#> # total N=908 valid N=901 mean=2.94 sd=0.94
#> 
#> Value |                Label |   N | Raw % | Valid % | Cum. %
#> -------------------------------------------------------------
#>     1 |          independent |  66 |  7.27 |    7.33 |   7.33
#>     2 |   slightly dependent | 225 | 24.78 |   24.97 |  32.30
#>     3 | moderately dependent | 306 | 33.70 |   33.96 |  66.26
#>     4 |   severely dependent | 304 | 33.48 |   33.74 | 100.00
#>  <NA> |                 <NA> |   7 |  0.77 |    <NA> |   <NA>

frq(efc$e42dep) |> print_md()

frq(efc$e42dep) |> print_html()

efc |> 
  group_by(e16sex, c172code) |> 
  frq(e42dep)
#> elder's dependency (e42dep) <numeric> 
#> # grouped by: male, low level of education
#> # total N=80 valid N=80 mean=3.06 sd=0.92
#> 
#> Value |                Label |  N | Raw % | Valid % | Cum. %
#> ------------------------------------------------------------
#>     1 |          independent |  5 |  6.25 |    6.25 |   6.25
#>     2 |   slightly dependent | 16 | 20.00 |   20.00 |  26.25
#>     3 | moderately dependent | 28 | 35.00 |   35.00 |  61.25
#>     4 |   severely dependent | 31 | 38.75 |   38.75 | 100.00
#>  <NA> |                 <NA> |  0 |  0.00 |    <NA> |   <NA>
#> 
#> elder's dependency (e42dep) <numeric> 
#> # grouped by: male, intermediate level of education
#> # total N=156 valid N=156 mean=2.83 sd=0.94
#> 
#> Value |                Label |  N | Raw % | Valid % | Cum. %
#> ------------------------------------------------------------
#>     1 |          independent | 15 |  9.62 |    9.62 |   9.62
#>     2 |   slightly dependent | 39 | 25.00 |   25.00 |  34.62
#>     3 | moderately dependent | 59 | 37.82 |   37.82 |  72.44
#>     4 |   severely dependent | 43 | 27.56 |   27.56 | 100.00
#>  <NA> |                 <NA> |  0 |  0.00 |    <NA> |   <NA>
#> 
#> elder's dependency (e42dep) <numeric> 
#> # grouped by: male, high level of education
#> # total N=43 valid N=43 mean=2.91 sd=0.81
#> 
#> Value |                Label |  N | Raw % | Valid % | Cum. %
#> ------------------------------------------------------------
#>     1 |          independent |  1 |  2.33 |    2.33 |   2.33
#>     2 |   slightly dependent | 13 | 30.23 |   30.23 |  32.56
#>     3 | moderately dependent | 18 | 41.86 |   41.86 |  74.42
#>     4 |   severely dependent | 11 | 25.58 |   25.58 | 100.00
#>  <NA> |                 <NA> |  0 |  0.00 |    <NA> |   <NA>
#> 
#> elder's dependency (e42dep) <numeric> 
#> # grouped by: female, low level of education
#> # total N=99 valid N=99 mean=2.95 sd=0.94
#> 
#> Value |                Label |  N | Raw % | Valid % | Cum. %
#> ------------------------------------------------------------
#>     1 |          independent |  7 |  7.07 |    7.07 |   7.07
#>     2 |   slightly dependent | 25 | 25.25 |   25.25 |  32.32
#>     3 | moderately dependent | 33 | 33.33 |   33.33 |  65.66
#>     4 |   severely dependent | 34 | 34.34 |   34.34 | 100.00
#>  <NA> |                 <NA> |  0 |  0.00 |    <NA> |   <NA>
#> 
#> elder's dependency (e42dep) <numeric> 
#> # grouped by: female, intermediate level of education
#> # total N=350 valid N=350 mean=2.90 sd=0.98
#> 
#> Value |                Label |   N | Raw % | Valid % | Cum. %
#> -------------------------------------------------------------
#>     1 |          independent |  30 |  8.57 |    8.57 |   8.57
#>     2 |   slightly dependent |  96 | 27.43 |   27.43 |  36.00
#>     3 | moderately dependent | 104 | 29.71 |   29.71 |  65.71
#>     4 |   severely dependent | 120 | 34.29 |   34.29 | 100.00
#>  <NA> |                 <NA> |   0 |  0.00 |    <NA> |   <NA>
#> 
#> elder's dependency (e42dep) <numeric> 
#> # grouped by: female, high level of education
#> # total N=113 valid N=113 mean=3.04 sd=0.85
#> 
#> Value |                Label |  N | Raw % | Valid % | Cum. %
#> ------------------------------------------------------------
#>     1 |          independent |  4 |  3.54 |    3.54 |   3.54
#>     2 |   slightly dependent | 26 | 23.01 |   23.01 |  26.55
#>     3 | moderately dependent | 44 | 38.94 |   38.94 |  65.49
#>     4 |   severely dependent | 39 | 34.51 |   34.51 | 100.00
#>  <NA> |                 <NA> |  0 |  0.00 |    <NA> |   <NA>


efc |> 
  group_by(e16sex, c172code) |> 
  frq(e42dep) |> 
  print_md()

efc |> 
  group_by(e16sex, c172code) |> 
  frq(e42dep) |> 
  print_html()