in lt_ambiguous from lt_regroup_age.R the argument for lt_single_qx. Now works:
lt_single <- DemoToolsData::modelLTx1 %>% filter(type_mlt=="UN Chilean",sex=="female", e0==90) %>% slice(1:101) continue_single <- lt_ambiguous(nMx_or_nqx_or_lx = lt_single$lx1, type = "l", Age = lt_single$age,Sex = "m", Single = T) not_more_single <- lt_ambiguous(nMx_or_nqx_or_lx = lt_single$lx1, type = "l", Age = lt_single$age,Sex = "m", Single = F)
I can add a test file for that if you want, also checking all the function.
More spread bounds in first values for iteration process to fit e_0 in LC Limited.
Two changes:
in
lt_ambiguous
fromlt_regroup_age.R
the argument forlt_single_qx
. Now works:lt_single <- DemoToolsData::modelLTx1 %>% filter(type_mlt=="UN Chilean",sex=="female", e0==90) %>% slice(1:101) continue_single <- lt_ambiguous(nMx_or_nqx_or_lx = lt_single$lx1, type = "l", Age = lt_single$age,Sex = "m", Single = T) not_more_single <- lt_ambiguous(nMx_or_nqx_or_lx = lt_single$lx1, type = "l", Age = lt_single$age,Sex = "m", Single = F)
I can add a test file for that if you want, also checking all the function.More spread bounds in first values for iteration process to fit
e_0
in LC Limited.