Utility function to return jags data and model for reporting (e.g. in appendix)

get_jags_info(
  sims,
  include.comments = FALSE,
  input.round.function = function(x) signif(x, digits = 4)
)

Arguments

sims

rjags object

include.comments

Logical, should comments in the model by included or stripped out (default: FALSE)

input.round.function

Function to apply to data inputs - default: function(x) signif(x, digits = 4)

Value

jagsInfo object which contains jags simulation information accesed via a call to print

Author

Iain Bennett (adaptations: Sandro Gsteiger)