Write a copy of the input parameters.

saveRDS(params_ls, here::here(paste0(paths_ls$output_data_dir_1L_chr,
                                     "/I_INPUTS_",
                                     params_ls$rprt_type_1L_chr,
                                     ".RDS")))

r ifelse((paths_ls$write_to_dir_nm_1L_chr == "Fake" & params_ls$rprt_type_1L_chr == "Analysis"),"Write a local copy of the fake dataset used in this analysis.","")

saveRDS(youthvars::replication_popl_tb, here::here(paths_ls$path_to_fake_data_1L_chr))
saveRDS(params_ls$ds_tb, here::here(paths_ls$path_to_fake_data_1L_chr))


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