Student-T tolerance-style interval around an estimate of a mean from summary.

TIntervalS(
  sample_size,
  sample_mean,
  sample_var,
  ...,
  nNA = 0,
  conf.level = 0.95
)

Arguments

sample_size

numeric scalar integer, size of sample.

sample_mean

numeric scalar, mean of sample.

sample_var

numeric scalar, variance of sample (Bessel-corrected).

...

extra arguments passed to TInterval.

nNA

number of NAs seen.

conf.level

confidence level to draw interval

Value

wrapped stat

See also

Examples

set.seed(2018) d <- rnorm(100) + 3.2 TIntervalS(length(d), mean(d), stats::var(d))
#> [1] "TInterval: (n=100 ~ 3.221+-1.016*Z: c(0.9747)[3.02, 3.422])."