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)


richelbilderbeek/wiritttes documentation built on May 27, 2019, 8:14 a.m.