Create a JC69 site model

create_jc69_site_model(id = NA, gamma_site_model = create_gamma_site_model())

Arguments

id

the IDs of the alignment (can be extracted from the FASTA filename using get_alignment_id)

gamma_site_model

a gamma site model, as created by create_gamma_site_model

Value

a JC69 site_model

Author

Richèl J.C. Bilderbeek

Examples

 jc69_site_model <- create_jc69_site_model()

 output_filename <- get_beautier_tempfilename()
 create_beast2_input_file(
   input_filename = get_fasta_filename(),
   output_filename = output_filename,
   site_model = jc69_site_model
 )
file.remove(output_filename)
#> [1] TRUE