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

## ----soft, eval=FALSE---------------------------------------------------------
# soft <- wf_calibrate(
#   design,
#   target,
#   method = "soft",
#   tolerance = 0.02
# )
# 
# wf_report(soft, audience = "statistician")$sections$soft_relaxation

## ----ebal, eval=FALSE---------------------------------------------------------
# ebal <- wf_calibrate(
#   design,
#   target,
#   method = "ebal",
#   tol = 1e-10
# )
# 
# wf_report(ebal, audience = "statistician")

## ----logit, eval=FALSE--------------------------------------------------------
# bounded <- wf_calibrate(
#   design,
#   target,
#   method = "logit",
#   bounds = c(0.3, 3)
# )