gtd <- gl2related(bandicoot.gl[1:10,1:20], save=FALSE, )
if (FALSE) {
##running with the related package, use
#install.packages('related', repos='http://R-Forge.R-project.org')
library(related)
coan <- coancestry(gtd, wang=1)
head(coan$relatedness)
##check ?coancestry for information how to use the function.
}
Run the code above in your browser using DataLab