if (beautier::is_on_ci()) {
phylogeny <- ape::read.tree(text = "(((A:1, B:1):1, C:2):1, D:3);")
pir_params <- create_test_pir_params()
errors <- NA
if (
rappdirs::app_dir()$os != "win" &&
beastier::is_beast2_installed()
) {
pir_run(
phylogeny = phylogeny,
pir_params = pir_params
)
} else {
create_test_pir_run_output()
}
}
Run the code above in your browser using DataLab