if (rappdirs::app_dir()$os != "win" && beautier::is_on_github_actions()) {
# it does not work on Windows
experiments <- create_all_experiments()
check_experiments(experiments)
pir_params <- create_pir_params(
alignment_params = create_test_alignment_params(),
experiments = experiments,
evidence_filename = get_temp_evidence_filename()
)
}
Run the code above in your browser using DataLab