Last chance! 50% off unlimited learning
Sale ends in
Thins the MCMC posterior draws in an object of class "bvarlist"
.
# S3 method for bvarlist
thin_posterior(x, thin = 10)
an object of class "bvarlist"
.
an integer specifying the thinning interval between successive values of posterior draws.
An object of class "bvarlist"
.
# NOT RUN {
# Load data
data("e1")
e1 <- diff(log(e1)) * 100
# Generate multiple model matrices
model <- gen_var(e1, p = 1:2, deterministic = 2,
iterations = 100, burnin = 10)
# Add prior specifications
model <- add_priors(model)
# Obtain posterior draws
object <- draw_posterior(model)
# Thin
object <- thin_posterior(object)
# }
Run the code above in your browser using DataLab