check_empty_beautier_folder()
# Create an MCMC with local filenames
mcmc <- create_mcmc()
mcmc$tracelog$filename <- "trace.log"
mcmc$screenlog$filename <- "screen.log"
mcmc$treelog$filename <- "tree.log"
# Nah, files should be put in '/home/john' folder
mcmc <- rename_mcmc_filenames(
mcmc = mcmc,
rename_fun = get_replace_dir_fun("/home/john")
)
# Nah, files should be put in '/home/doe' folder instead
mcmc <- rename_mcmc_filenames(
mcmc = mcmc,
rename_fun = get_replace_dir_fun("/home/doe")
)
# Nah, files should be put in local folder instead
mcmc <- rename_mcmc_filenames(
mcmc = mcmc,
rename_fun = get_remove_dir_fun()
)
check_empty_beautier_folder()
Run the code above in your browser using DataLab