# \donttest{
# Load simulated time series data
data(ts_data)
example_data <- ts_data[1:100,1:4]
# Estimate a GVAR model
fit <- stan_gvar(example_data, n_chains = 2)
# Extract posterior samples
posterior_plot(fit)
# }
Run the code above in your browser using DataLab