## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(collapse = TRUE, comment = "#>",
                      fig.width = 7, fig.height = 5.2, dpi = 96)

## ----setup--------------------------------------------------------------------
library(logcumulant)
data(reliability_datasets)
yarn <- reliability_datasets$Yarn

## -----------------------------------------------------------------------------
log_cumulant_diagram(yarn, "Yarn", B = 300)

## -----------------------------------------------------------------------------
kurtosis_diagram(yarn, "Yarn", B = 300)

## -----------------------------------------------------------------------------
cv_diagram(yarn, "Yarn", B = 300)

## ----fig.width = 12, fig.height = 4.2-----------------------------------------
three_diagrams(yarn, "Yarn", B = 300)

## -----------------------------------------------------------------------------
multi_lc_diagram(
  reliability_datasets[c("Airplane", "BallBearing", "Yarn")],
  B = 300
)