Evaluate log-posterior of calibrated parameters

Source: R/03_calibration_functions.R

log_post Computes a log-posterior value for one (or multiple) parameter set(s) based on the simulation model, likelihood functions and prior distributions.

log_post(v_params)

Arguments

v_params

Vector (or matrix) of model parameters

Value

A scalar (or vector) with log-posterior values.

Examples

v_param_names  <- c("p_S1S2", "hr_S1", "hr_S2")
n_param        <- length(v_param_names)
v_lb <- c(p_S1S2 = 0.01, hr_S1 = 1.0, hr_S2 = 5)  # lower bound
v_ub <- c(p_S1S2 = 0.50, hr_S1 = 4.5, hr_S2 = 15) # upper bound
v_target_names <- c("Surv", "Prev", "PropSick")
n_target       <- length(v_target_names)
log_post(v_params = sample.prior(n_samp = 5))
#> [1] -315.216128 -138.517739 -180.258759 -198.620562    3.401287