check_empty_beautier_folder()
fasta_filename <- get_beautier_path("anthus_aco.fas")
# The first two taxa are sister species
mrca_prior <- create_mrca_prior(
taxa_names = get_taxa_names(filename = fasta_filename)[1:2]
)
# The taxa are monophyletic
mrca_prior <- create_mrca_prior(
taxa_names = get_taxa_names(filename = fasta_filename),
is_monophyletic = TRUE
)
# Set the crown age to 10
mrca_prior <- create_mrca_prior(
taxa_names = get_taxa_names(fasta_filename),
mrca_distr = create_normal_distr(mean = 10, sigma = 0.1)
)
check_empty_beautier_folder()
Run the code above in your browser using DataLab