if (beautier::is_on_ci()) {
phylogeny <- ape::read.tree(text = "(((A:1, B:1):1, C:2):1, D:3);")
# Select all experiments with 'run_if' is 'always'
experiment <- create_test_gen_experiment()
experiments <- list(experiment)
pir_params <- create_pir_params(
alignment_params = create_test_alignment_params(),
experiments = experiments
)
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