ade4 (version 1.4-3)

ggtortoises: Microsatellites of Galapagos tortoises populations

Description

This data set gives genetic relationships between Galapagos tortoises populations with 10 microsatellites.

Usage

data(ggtortoises)

source

M.C. Ciofi, C. Milinkovitch, J.P. Gibbs, A. Caccone, and J.R. Powell (2002) Microsatellite analysis of genetic divergence among populations of giant galapagos tortoises. Molecular Ecology 11: 2265-2283.

References

M.C. Ciofi, C. Milinkovitch, J.P. Gibbs, A. Caccone, and J.R. Powell (2002) Microsatellite analysis of genetic divergence among populations of giant galapagos tortoises. Molecular Ecology 11: 2265-2283.

See a data description at http://pbil.univ-lyon1.fr/R/pps/pps069.pdf (in French).

Examples

if(require(pixmap, quiet=TRUE)){
	data(ggtortoises)
	a1 <- ggtortoises$area
	area.plot(a1)
	rect(min(a1$x), min(a1$y), max(a1$x), max(a1$y), col = "lightblue")
	invisible(lapply(split(a1, a1$id), function(x) polygon(x[, -1],col = "white")))
	s.label(ggtortoises$misc, grid=FALSE,include.ori=FALSE,addaxes=FALSE,add.p=TRUE)
	listico <- ggtortoises$ico[as.character(ggtortoises$pop$carap)]
	s.logo(ggtortoises$pop,listico,add.p=TRUE)
}