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

## -----------------------------------------------------------------------------
library(rmass2)
output <- rmass2(attrit = c(0.2))

## -----------------------------------------------------------------------------
str(output)

## -----------------------------------------------------------------------------
output$N11

## -----------------------------------------------------------------------------
rmass2(mode = 2, attrit = c(0.2))

## -----------------------------------------------------------------------------
rmass2(ratio = 1.1, attrit = c(0.2))

## -----------------------------------------------------------------------------
rmass2(n = 4, attrit = c(0.2, 0.1, 0.1), ctype = 3, corr = c(0.8, 0.5, 0.5))

## -----------------------------------------------------------------------------
rmass2(attrit = c(0.2), sigma = c(1, 2))

## -----------------------------------------------------------------------------
rmass2(n = 4, attrit = c(0.2, 0.1, 0.1), estype = 1)