collect_pir_outs: Collect the results of multiple pirouette runs

View source: R/collect_pir_outs.R

collect_pir_outsR Documentation

Collect the results of multiple pirouette runs

Description

Collect the results of multiple pirouette runs

Usage

collect_pir_outs(pir_outs)

Arguments

pir_outs

the output of pir_runs

Value

a single pir_run output as produced by a single pir run.

Author(s)

Giovanni Laudanno, Richèl J.C. Bilderbeek

Examples


if (beautier::is_on_ci() && beastier::is_beast2_installed()) {

  # Check cleanup by other functions
  beastier::check_empty_beaustier_folders()

  pir_paramses <- list()
  pir_paramses[[1]] <- pirouette::create_test_pir_params()
  pir_paramses[[2]] <- pirouette::create_test_pir_params()

  phylogenies <- list()
  phylogenies[[1]] <- ape::read.tree(text = "((A:2, B:2):1, C:3);")
  phylogenies[[2]] <- ape::read.tree(text = "((A:1, B:1):2, C:3);")

  pir_outs <- pir_runs(
    phylogenies = phylogenies,
    pir_paramses = pir_paramses
  )
  pir_out_total <- collect_pir_outs(pir_outs)

  # Cleanup
  beastier::remove_beaustier_folders()
  beastier::check_empty_beaustier_folders()
}

richelbilderbeek/pirouette documentation built on Oct. 18, 2023, 3:09 p.m.