R语言 将数值修约为2位数,并在计算中排除NA

2uluyalo  于 2023-03-15  发布在  其他
关注(0)|答案(1)|浏览(115)

我想在R中运行一个表1函数,排除计算中的缺失值,并将数字四舍五入到小数点后1位。
这是我的代码,在计算中不包括NA,但我不知道如何四舍五入到小数点后一位。

table1(~.|adulttab$Sex.x, data=adulttab[-1],render.categorical ="FREQ (PCTnoNA%)",
   render.continuous=c(.="Mean [SD]",.="Median [Q25, Q75]",.="Min, Max"))

是否有办法在表1中包含置信区间?

5fjcxozz

5fjcxozz1#

你可以试试这样的方法:

rndr.cont <- function(x, ...) {
    s  <- lapply(stats.default(x, ...), round_pad, digits=1)
    CI <- round_pad(t.test(x)$conf.int, digits=1)
    with(s, c("", 
            "Mean [SD]"         = sprintf("%s [%s]",     MEAN, SD),
            "95% CI"            = sprintf("(%s, %s)",    CI[1], CI[2]),
            "Median [Q25, Q75]" = sprintf("%s [%s, %s]", MEDIAN, q25, q75),
            "Min, Max"          = sprintf("%s, %s",      MIN, MAX)
    ))
}

table1(~.|adulttab$Sex.x, data=adulttab[-1],render.categorical ="FREQ (PCTnoNA%)",
   render.continuous=rndr.cont)

相关问题