inst/snippet/uniroot.R

f <- function(n) { qt(0.975, n-1) * 2 / sqrt(n) - 0.25}
uniroot(f, c(10, 1000))
rpruim/fastR2 documentation built on Nov. 11, 2023, 7:32 a.m.