relist, but adds the capability to fill in
parameters from a "fixed-parameter" vectorR/utils.R
restore.Rdconvert a parameter vector back to a structured list
Like relist, but adds the capability to fill in
parameters from a "fixed-parameter" vector
restore(flesh, skeleton, fixed = NULL)a vector to be restored
a list, the structure of which determines the structure of the result
a list which determines extra components to fill in
Depends at present on the names of the unlisted object; may be fragile
Other classic_macpan:
add_d_log(),
add_updated_vaxrate(),
aggregate_agecats(),
calibrate_comb(),
calibrate(),
check_age_cat_compatibility(),
check_contact_rate_setting(),
col_multiply(),
condense_age(),
condense_params_vax(),
condense_state(),
condense_vax(),
dev_is_tikz(),
do_step(),
expand_params_age(),
expand_params_desc_age(),
expand_params_desc_variant(),
expand_params_desc_vax(),
expand_params_mistry(),
expand_params_variant(),
expand_params_vax(),
expand_state_age(),
expand_state_vax(),
expand_stateval_testing(),
fix_pars(),
fix_stored(),
forecast_ensemble(),
forecast_sim(),
getData(),
get_GI_moments(),
get_Gbar(),
get_R0(),
get_doses_per_day(),
get_evec(),
get_kernel_moments(),
get_opt_pars(),
get_r(),
invlink_trans(),
make_betavec(),
make_beta(),
make_jac(),
make_ratemat(),
make_state(),
make_test_wtsvec(),
make_vaxrate(),
mk_Nvec(),
mk_agecats(),
mk_contact_rate_setting(),
mk_mistry_Nvec(),
mk_pmat(),
mk_vaxcats(),
mle_fun(),
non_expanded_states,
rExp(),
read_params(),
repair_names_age(),
run_sim_ageify(),
run_sim_break(),
run_sim_loglin(),
run_sim_mobility(),
run_sim_range(),
run_sim(),
show_ratemat(),
testify(),
texify(),
trans_state_vars(),
update_contact_rate_setting(),
update_foi(),
update_params_mistry(),
vis_model(),
write_params()
opt_pars <- list(log_E0=4, log_beta0=-1, log_rel_beta0=c(-1,-1), log_nb_disp=0)
restore(unlist(opt_pars),opt_pars)
#> $log_E0
#> [1] 4
#>
#> $log_beta0
#> [1] -1
#>
#> $log_rel_beta0
#> [1] -1 -1
#>
#> $log_nb_disp
#> [1] 0
#>
invlink_trans(restore(unlist(opt_pars),opt_pars))
#> $E0
#> [1] 54.59815
#>
#> $beta0
#> [1] 0.3678794
#>
#> $rel_beta0
#> [1] 0.3678794 0.3678794
#>
#> $nb_disp
#> [1] 1
#>