您的帮助非常感谢在科学表示法中包含gtsummary::tbl_regression
函数的gtsummary::tbl_regression
p值。我使用的是大数据,对于p值> 0.001显示3个小数点,对于p值<0.001显示科学表示法非常有用。
一个有代表性的例子
# load packages
library(gtsummary)
theme_gtsummary_compact()
# linear model
mod1 <- lm(mpg ~ cyl + gear, data = mtcars %>% dplyr::mutate(cyl = factor(cyl)))
# regression table
tbl_regression(mod1)
我想知道是否有可能得到2.06e-4,5.76e-8,和0.422 p值分别为cyl 6,cyl 8和齿轮。
summary(mod1)
非常感谢!
发布于 2021-11-04 10:21:59
您可以为p值格式定义自己的函数:
tbl_regression(
mod1,
pvalue_fun = function(x) {
if_else(
is.na(x),
NA_character_,
if_else(x < 0.001, format(x, digits = 3, scientific = TRUE), format(round(x, 3), scientific = F))
)
}
)
https://stackoverflow.com/questions/69843971
复制相似问题