inst/snippets/Example8.9b.R

t <- diff.mean / sqrt(MSE * (1/8 + 1/8)); t
pt(t, df = 21) * 2

Try the Lock5withR package in your browser

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

Lock5withR documentation built on May 2, 2019, 3:43 p.m.