R/get_test_filenames.R

Defines functions get_fasta_filename

Documented in get_fasta_filename

#' Get the path of a FASTA file used in testing
#' @return the path of a FASTA file used in testing
#' @examples
#' if (is_on_ci()) {
#'
#'   input_filename <- get_fasta_filename()
#'   output_filename <- get_beautier_tempfilename()
#'
#'   create_beast2_input_file(
#'     input_filename = input_filename,
#'     output_filename = output_filename
#'   )
#'   file.remove(output_filename)
#'
#'   remove_beautier_folder()
#' }
#' @author Richèl J.C. Bilderbeek
#' @export
get_fasta_filename <- function() {
  get_beautier_path("test_output_0.fas")
}

Try the beautier package in your browser

Any scripts or data that you put into this service are public.

beautier documentation built on Nov. 2, 2023, 5:08 p.m.