Rerun analysis with new parameters

Test candidate models, predictors and covariates


r ifelse(exists("existing_mdls_chr"),"### Remove duplicate models","")

outp_smry_ls$mdl_nms_ls <- outp_smry_ls$mdl_nms_ls %>%
  purrr::map(~.x[!.x %in% existing_mdls_chr]) %>%
  purrr::compact()
outp_smry_ls$predr_vars_nms_ls <- outp_smry_ls$predr_vars_nms_ls[outp_smry_ls$predr_vars_nms_ls %>% purrr::map_lgl(~{
        test_chr <- .x
        !any(existing_predrs_ls %>% purrr::map_lgl(~identical(.x,test_chr))
        )})]

Create longitudinal models


saveRDS(outp_smry_ls,paste0(outp_smry_ls$path_to_write_to_1L_chr,"/I_ALL_OUTPUT_SUP.RDS"))


ready4-dev/TTU documentation built on July 2, 2024, 8:12 a.m.