inst/doc/hypothesis-testing.R

In UBC-MDS/hypeR:

## ----setup, include = FALSE----------------------------------------------
knitr::opts_chunk$set(
  collapse = TRUE,
  comment = "#>"
)

## ----lib-----------------------------------------------------------------
#devtools::load_all()

## ------------------------------------------------------------------------
heights <- c(72.6, 57.2, 67.6, 64.8, 59.3, 72.0, 67.2, 61.3, 64.7, 59.6)

## ------------------------------------------------------------------------
t <- t_test(data = heights, mean_0 = 70)
print(t)

## ------------------------------------------------------------------------
hyp_test(data = heights, mean_0 = 70, alpha = 0.05)

## ------------------------------------------------------------------------
conf_int(data = heights)