Create a parameter called 'rate GT'
See also
the function create_param
contains a list
of all parameters that can be created
Examples
if (is_on_ci()) {
# Create parameter
rate_gt_param <- create_rate_gt_param(value = 1, estimate = FALSE)
# Use the parameter to create a BEAST2 input file
beast2_input_file <- get_beautier_tempfilename()
create_beast2_input_file(
input_filename = get_fasta_filename(),
beast2_input_file,
site_model = create_gtr_site_model(
rate_gt_param = rate_gt_param
)
)
file.remove(beast2_input_file)
remove_beautier_folder()
}