pedigreeStats(Ped, cohorts = NULL, dat = NULL,
retain='informative', graphicalReport = "y",
includeA=TRUE,lowMem=FALSE,grContrast=FALSE)dat. Otherwise, specifying fixPedigreedata(gryphons)
pedigree<-gryphons[,1:3]
gryphonsPedigreeSummary<-pedigreeStats(pedigree,
cohorts=gryphons$cohort,graphicalReport='n')
gryphonsPedigreeSummary$totalMaternities
gryphonsPedigreeSummary$totalPaternities
gryphonsPedigreeSummary$maternitiesByCohort
gryphonsPedigreeSummary$paternitiesByCohortRun the code above in your browser using DataLab