Shared allele distance for diploid loci
Shared allele distance for codominant markers (Bowcock et al., 1994). One minus proportion of alleles shared by two individuals averaged over loci (loci with missing values for at least one individual are ignored).
alleledist(allelelist,ni,np,count=FALSE)
allelelist |
a list of lists. In the "outer" list, there are
|
ni |
integer. Number of individuals. |
np |
integer. Number of loci. |
count |
logical. If |
A symmetrical matrix of shared allele distances between individuals.
Bowcock, A. M., Ruiz-Linares, A., Tomfohrde, J., Minch, E., Kidd, J. R., Cavalli-Sforza, L. L. (1994) High resolution of human evolutionary trees with polymorphic microsatellites. Nature 368, 455-457.
data(tetragonula) tnb <- coord2dist(coordmatrix=tetragonula.coord[1:50,],cut=50,file.format="decimal2",neighbors=TRUE) ta <- alleleconvert(strmatrix=tetragonula[1:50,]) tai <- alleleinit(allelematrix=ta,neighborhood=tnb$nblist,distance="none") str(alleledist((unbuild.charmatrix(tai$charmatrix,50,13)),50,13))
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.