# NOT RUN {
data(geneaJi)
# Original data is a data.frame
geneaJi[1:12,]
genJi<-gen.genealogy(geneaJi)
# As a genealogy object
genJi
# Genealogy as a data.frame
genJi_df<-gen.genout(genJi)
genJi_df[1:12,]
# Maternal lineage
genJi_MaLi<-gen.lineages(geneaJi, maternal = TRUE)
# Maternal lineage as a data.frame
genJi_MaLi_df<-gen.genout(genJi_MaLi)
genJi_MaLi_df
# }
Run the code above in your browser using DataLab