# NOT RUN {
data(ToyMap)
spc <- set_specie(ToyMap)
## through standalone function
AA <- founder(spc, "AA")
aa <- founder(spc, "aa")
## or by the Specie's method
Aa <- spc$founder("Aa")
aA <- spc$founder("aA")
# }
Run the code above in your browser using DataLab