Summarises posterior draws of structural shocks

Transforms posterior draws of structural shocks into a table containing posterior means, medians, standard deviations, and equal-tailed credible intervals, or retains the individual draws when requested.

Usage

tidy_shocks(object, ...)

# Default S3 method
tidy_shocks(object, ...)

Arguments

object

A posterior model object, a PosteriorShocks object, or a structural-shock array.

...

Additional arguments passed to computation methods.

Value

A bsvar_post_tbl (tibble subclass) with columns model, object_type, variable, time, mean, median, sd, lower, and upper. When draws = TRUE, columns draw and value replace the summary statistics.

Examples

# Small posterior (S = 5 draws)
data(us_fiscal_lsuw, package = "bsvars")
spec <- bsvars::specify_bsvar$new(us_fiscal_lsuw, p = 1)
#> The identification is set to the default option of lower-triangular structural matrix.
post <- bsvars::estimate(spec, S = 5, show_progress = FALSE)

# Posterior summaries of structural shocks
result <- tidy_shocks(post)
head(result)
#> # A tibble: 6 × 19
#>   model  object_type variable time      mean   median    sd   lower   upper
#>   <chr>  <chr>       <chr>    <chr>    <dbl>    <dbl> <dbl>   <dbl>   <dbl>
#> 1 model1 shocks      ttr      1948.25 -0.777 -0.824   0.270 -1.01   -0.421 
#> 2 model1 shocks      ttr      1948.5  -0.291 -0.459   0.323 -0.545   0.147 
#> 3 model1 shocks      ttr      1948.75  0.307  0.134   0.381 -0.0148  0.818 
#> 4 model1 shocks      ttr      1949     0.156 -0.00716 0.376 -0.181   0.653 
#> 5 model1 shocks      ttr      1949.25 -0.105 -0.225   0.351 -0.437   0.355 
#> 6 model1 shocks      ttr      1949.5  -0.424 -0.557   0.365 -0.804   0.0254
#> # ℹ 10 more variables: analysis_type <chr>, interval_probability <dbl>,
#> #   interval_method <chr>, scale_by <chr>, scale_var <chr>, scale_factor <dbl>,
#> #   units <chr>, source_package <chr>, source_version <chr>, n_draws <int>