dist_amova: Estimation of amova distance
In MarianaLag/Mlag: Tools Related to the Spatial Analysis of Genetic Marker Data

Description Usage Arguments Value Author(s) Examples

This function returns a measure of genetic distance based upon the AMOVA distance metric.

1	dist_amova(x)

`x`	A `data.frame` with `locus` columns in it.

The AMOVA distance matrix

Rodney J. Dyer rjdyer@vcu.edu

AA <- locus( c("A","A") )
AB <- locus( c("A","B") )
BB <- locus( c("B","B") )
AC <- locus( c("A","C") )
AD <- locus( c("A","D") )
BC <- locus( c("B","C") )
BD <- locus( c("B","D") )
CC <- locus( c("C","C") )
CD <- locus( c("C","D") )
DD <- locus( c("D","D") )
loci <- c(AA,AB,AC,AD,BB,BC,BD,CC,CD,DD) 
D <- dist_amova( loci )
rownames(D) <- colnames(D) <- as.character(loci)
D