R/gtsummary：排除一些 p 值并更改脚注

Question

有谁知道是否可以从摘要 table（tbl_summary() 和 add_p()）中排除一些 p 值？

此外，我们可以更改有关所用测试的脚注吗？

library(gtsummary)

mtcars %>%
tbl_summary(by = am) %>%
add_p()

Answer 1

这些都是很好的定制问题，答案是肯定的！

首先，您可以将 include = 参数用于 add_p() 函数，以及要包含的变量的字符向量（或使用 - 排除），或者任何 tidyselect helper（即 starts_with()），到 select 要包含在 table 中的 p 值。

接下来，我提供了一个使用 {gt} 包中的参数来修改默认脚注列表测试的示例。另一个示例可以在 {gtsummary} gallery of tables.

中看到

祝你好运，希望对你有所帮助！

library(gtsummary)
library(dplyr, warn.conflicts = F)
library(gt)

trial %>% 
  select(trt, stage, age, grade) %>% 
  tbl_summary(by = trt) %>% 
  add_p(
    include = c(-age) #Can use any tidyselect helpers/select syntax to specify which p-vals
  ) %>% 
  as_gt(include = -tab_footnote) %>%  # if using gt, can exclude footnotes this way 
  tab_footnote( # and can modify/add footnotes this way
    footnote = "Tests used are...",
    locations = cells_column_labels(columns = vars(p.value))
  )

Answer 2

另一种方法是直接tweek列表：

plouf <- mtcars %>%
  tbl_summary(by = am) %>%
  add_p()
plouf$table_body[1,"p.value"] <- NA
plouf$table_header[6,"footnote"] <- "my personal statistic test"
plouf

R/gtsummary：排除一些 p 值并更改脚注

R/gtsummary: Exclude some p-values and change the footnote

r

gtsummary