add_q: Add a column of q-values to account for multiple comparisons

Description Usage Arguments Example Output Author(s) See Also Examples

View source: R/add_q.R

Description

Adjustments to p-values are performed with stats::p.adjust.

Usage

1
add_q(x, method = "fdr", pvalue_fun = NULL, quiet = NULL)

Arguments

x

a gtsummary object

method

String indicating method to be used for p-value adjustment. Methods from stats::p.adjust are accepted. Default is method = "fdr".

pvalue_fun

Function to round and format p-values. Default is style_pvalue. The function must have a numeric vector input (the numeric, exact p-value), and return a string that is the rounded/formatted p-value (e.g. pvalue_fun = function(x) style_pvalue(x, digits = 2) or equivalently, purrr::partial(style_pvalue, digits = 2)).

quiet

Logical indicating whether to print messages in console. Default is FALSE

Example Output

Example 1

Example 2

Author(s)

Esther Drill, Daniel D. Sjoberg

See Also

Other tbl_summary tools: add_n.tbl_summary(), add_overall(), add_p.tbl_summary(), add_stat_label(), bold_italicize_labels_levels, inline_text.tbl_summary(), inline_text.tbl_survfit(), modify, tbl_merge(), tbl_stack(), tbl_summary()

Other tbl_svysummary tools: add_n.tbl_summary(), add_overall(), add_p.tbl_svysummary(), add_stat_label(), modify, tbl_merge(), tbl_stack(), tbl_svysummary()

Other tbl_regression tools: add_global_p(), bold_italicize_labels_levels, combine_terms(), inline_text.tbl_regression(), modify, tbl_merge(), tbl_regression(), tbl_stack()

Other tbl_uvregression tools: add_global_p(), bold_italicize_labels_levels, inline_text.tbl_uvregression(), modify, tbl_merge(), tbl_stack(), tbl_uvregression()

Examples

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
# Example 1 ----------------------------------
add_q_ex1 <-
  trial[c("trt", "age", "grade", "response")] %>%
  tbl_summary(by = trt) %>%
  add_p() %>%
  add_q()

# Example 2 ----------------------------------
if (requireNamespace("car"))
  add_q_ex2 <-
    trial[c("trt", "age", "grade", "response")] %>%
    tbl_uvregression(
      y = response,
      method = glm,
      method.args = list(family = binomial),
      exponentiate = TRUE
    ) %>%
    add_global_p() %>%
    add_q()

ddsjoberg/gtsummary documentation built on April 8, 2021, 5:48 a.m.