log_post: Evaluate log-posterior of calibrated parameters

In feralaes/cdx2cea: A cost-efectiveness analysis of testing stage II colon cancer patients for the absence of CDX2 biomarker followed by adjuvant chemotherapy

Evaluate log-posterior of calibrated parameters

Description

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

Usage

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("r_DieMets",
                    "r_RecurCDX2pos",
                    "hr_RecurCDX2neg",
                    "p_Mets")
n_param        <- length(v_param_names)
v_lb <- c(r_DieMets       = 0.037, 
          r_RecurCDX2pos  = 0.001,
          hr_RecurCDX2neg = 1.58, 
          p_Mets          = 0.9))  # lower bound
v_ub <- c(r_DieMets       = -log(1-(1-0.03))/60, 
          r_RecurCDX2pos  = 0.03,
          hr_RecurCDX2neg = 4.72, 
          p_Mets          = 0.99) # upper bound
v_target_names <- c("DFS", "OS", "DSS")
n_target       <- length(v_target_names)
log_post(v_params = sample.prior(n_samp = 5))

feralaes/cdx2cea documentation built on April 7, 2024, 10:12 a.m.