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

## ----setup--------------------------------------------------------------------
library(EZbakR)

## -----------------------------------------------------------------------------
simdata <- EZSimulate(250)

ezbdo <- EZbakRData(simdata$cB,
                    simdata$metadf)

### Input: EZbakRData object
qc <- EZQC(ezbdo)


### Input: EZbakRFractions object
ezbdo <- EstimateFractions(ezbdo)
qc_fn <- EZQC(ezbdo)