likelihood computes a likelihood value for one (or multiple)
parameter set(s).
likelihood(v_params, l_params_all = load_all_params(), v_weights = NULL)Vector (or matrix) of model parameters.
List with all parameters of the decision model.
Numeric vector with one weight per calibration target, used
to compute the overall log-likelihood as a weighted sum of the
target-specific log-likelihoods. If NULL (default), all targets get
an equal weight of one.
A scalar (or vector) with likelihood values.
# \donttest{
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", "PropSicker")
n_target <- length(v_target_names)
likelihood(v_params = sample_prior(n_samp = 2))
#> [1] 4.624755e-83 9.389466e-08
# }