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))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.