library(ape) library(wiritttes) options(warn = 2) n_taxa <- 5 phylogeny <- rcoal(n = n_taxa) alignment <- convert_phylogeny_to_alignment( phylogeny = phylogeny, sequence_length = 10 ) image(alignment)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.