alignment <- sim_alignment_with_std_nsm(
phylogeny = ape::read.tree(text = "((A:1, B:1):2, C:3);"),
root_sequence = "aaaa",
mutation_rate = 0.1,
site_model = beautier::create_jc69_site_model()
)
check_alignment(alignment)
Run the code above in your browser using DataLab