powered by
Calculate S generally
calc_S(best_pars, S_fn = calc_S_base, fn_list = NULL)
named vector of parameters. "tau_1" must be a name. As must "tau_2" and "gamma_A" and "gamma_B"
function to calculate
NULL
Hewlett's S for the given model
# NOT RUN { best_pars <- c("tau_1" = 0, "tau_2" = 1, "gamma_A" = 1, "gamma_B" = 1) calc_S_base(best_pars) # should be 1 # }
Run the code above in your browser using DataLab