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

## -----------------------------------------------------------------------------
# options(bvartools.transition.messages = FALSE)

## -----------------------------------------------------------------------------
# object <- gen_var(data, p = 2, deterministic = "const")
# object <- add_priors(object)
# object <- draw_posterior(object)

## -----------------------------------------------------------------------------
# object <- create_bvarmodel(data, p = 2, deterministic = "const")
# object <- add_priors(object)
# object <- add_initial_values(object)
# object <- add_posterior_coefficients(object)

## -----------------------------------------------------------------------------
# object <- suppressMessages(gen_var(data, p = 2, deterministic = "const"))