if (beautier::is_on_ci()) {
twinning_params <- create_twinning_params()
check_twinning_params(twinning_params)
pir_params <- create_test_pir_params(
twinning_params = twinning_params
)
check_pir_params(pir_params)
if (beautier::is_on_ci() &&
rappdirs::app_dir()$os == "unix" &&
beastier::is_beast2_installed()) {
pir_out <- pir_run(
phylogeny = ape::read.tree(text = "((A:1, B:1):1, C:2);"),
pir_params = pir_params
)
}
}
Run the code above in your browser using DataLab