Create a report chunk for mental health indicators
Examples
report_op_mental()
#>
#> # Mental health
#>
#> ```{r k6Plot}
#> oldr::chart_k6(x = oldr::create_op_all(svy = svy), save_chart = FALSE)
#> ```
#>
#> ```{r k6Table}
#> knitr::kable(x = resultsDF[92:93, ],
#> caption = 'Psychological distress',
#> booktabs = TRUE,
#> digits = 2,
#> col.names = c('Indicator', 'Type', 'Est', '95% LCL', '95% UCL', 'Est', '95% LCL', '95% UCL', 'Est', '95% LCL', '95% UCL')) %>%
#> kableExtra::kable_styling(bootstrap_options = c('striped')) %>%
#> kableExtra::add_header_above(c(' ' = 2, 'ALL' = 3, 'MALES' = 3, 'FEMALES' = 3))
#> ```