r - 有没有办法在 tbl_summary 中使用 add_p 或 add_difference 函数进行一个有尾 t 检验？

Question

我想包括使用 gtsummary 的单尾 t 检验的结果。有没有办法做到这一点？

标签： rt-testgtsummary

Answer 1

您可以通过参数传递t.test()参数add_p(test.args=)。在您的情况下，您需要传递t.test(alternative = "less")(or "greater") 参数。下面的例子！

library(gtsummary)

tbl <-
  trial %>%
  select(age, marker, trt) %>%
  tbl_summary(by = trt, missing = "no") %>%
  add_p(
    all_continuous() ~ "t.test",
    test.args = all_tests("t.test") ~ list(alternative = "less")
  )

^{由reprex 包于 2021 年 10 月 10 日创建(v2.0.1)}