GENLIB (version 1.0.2)

gen.findFounders: Find common founder ancestors

Description

Returns all the ancestors that are founders for specified individuals in the genealogy.

Usage

gen.findFounders(gen, individuals, NbProcess=detectCores()-1)

Value

A vector of integers

See Also

gen.genealogy gen.founder gen.findMRCA gen.findDistance gen.find.Min.Distance.MRCA

Examples

data(geneaJi) 
genJi<-gen.genealogy(geneaJi) 
gen.founder(genJi)
gen.findFounders(genJi, individuals=c(1,29), NbProcess = 1)

data(genea140) 
gen140<-gen.genealogy(genea140) 
gen2<-gen.branching(gen140,pro=c(409033,408728)) 
615 founders in genealogy of #409033 and #408728
all_founders<-gen.founder(gen2) 
length(all_founders)

 all_commonFounders<-gen.findFounders(gen140, individuals=c(409033,408728), NbProcess = 1)
  length(all_commonFounders) \dontrun{127 founders common to #409033 and #408728}