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

## ----setup--------------------------------------------------------------------
library(WRestimates)

## -----------------------------------------------------------------------------
wr.ss(WR.true = 1.25, k = 0.5, p.tie = 0.1)

## -----------------------------------------------------------------------------
wr.power(N = 1000, WR.true = 1.25, k = 0.5, p.tie = 0.1)

## -----------------------------------------------------------------------------
wr.ci(WR = 1.22, Z = 1.96, N = 1200, k = 0.5, p.tie = 0.04)