通过 gtsummary 包中的 tbl_regression 增加呈现的 OR 的位数和 95% CI答案

【问题标题】：Increase number of digits on presented ORs and 95% CI by tbl_regression in gtsummary package通过 gtsummary 包中的 tbl_regression 增加呈现的 OR 的位数和 95% CI
【发布时间】：2021-08-05 15:12:03
【问题描述】：

如何将求幂 OR 上的位数以及它对应的 95% CI 从默认的 2 位增加到 3 位？

library(gtsummary)
data(trial)
  glm(response ~ trt, trial, family = binomial) %>%
  tbl_regression(exponentiate = TRUE)

res <- glm(response ~ trt, trial, family = binomial) %>%
          tbl_regression(exponentiate = TRUE) %>% style_sigfig( digits = 3)
#Error in abs(x) : non-numeric argument to mathematical function

【问题讨论】：

标签： r gtsummary

【解决方案1】：

当expoentiate为FALSE时，我们可以修改style_sigfig，如果是TRUE，修改style_ratio中的digits，如`?tbl_regression中所述

estimate_fun - 舍入和格式化系数估计的函数。系数未转换时默认为 style_sigfig，系数取幂时默认为 style_ratio。

默认都是2。

library(gtsummary)
library(dplyr)
glm(response ~ trt, trial, family = binomial) %>%
      tbl_regression(exponentiate = TRUE, 
        estimate_fun = purrr::partial(style_ratio, digits = 3),
         pvalue_fun = purrr::partial(style_sigfig, digits = 3))

【讨论】：

我已经注意到了这一点，当我尝试时，我收到以下错误：abs(x) 中的错误：数学函数的非数字参数
@Nelly 我更新了之前版本的帖子
@Nelly ：当您遇到错误时，您应该将错误消息的整个文本发布在您的问题正文中（而不是在 cmets 中）以及出现在您的控制台上的任何其他警告的文本.