R/ci2mse.R

Defines functions ci2mse

Documented in ci2mse

ci2mse = function(n1, n2, LL, UL, Alpha=0.1)
{
  t0 = qt(1 - Alpha/2, n1 + n2 - 2)
  SD = (log(UL) - log(LL))/(2*t0)
  mse = 2*SD^2/(1/n1 + 1/n2)
  return(mse)
}

Try the BE package in your browser

Any scripts or data that you put into this service are public.

BE documentation built on July 29, 2026, 5:07 p.m.