08.04.2015 Views

The ade4 Package - NexTag Supports Open Source Initiatives

The ade4 Package - NexTag Supports Open Source Initiatives

The ade4 Package - NexTag Supports Open Source Initiatives

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

utterfly 41<br />

Examples<br />

data(buech)<br />

par(mfrow = c(1,2))<br />

s.label(buech$xy, contour = buech$contour, neig = buech$neig)<br />

s.value (buech$xy, buech$tab2$Suspens-buech$tab1$Suspens,<br />

contour = buech$contour, neig = buech$neig, csi = 3)<br />

par(mfrow = c(1,1))<br />

butterfly<br />

Genetics-Ecology-Environment Triple<br />

Description<br />

Usage<br />

Format<br />

<strong>Source</strong><br />

This data set contains environmental and genetics informations about 16 Euphydryas editha butterfly<br />

colonies studied in California and Oregon.<br />

data(butterfly)<br />

butterfly is a list with 4 components.<br />

xy is a data frame with the two coordinates of the 16 Euphydryas editha butterfly colonies.<br />

envir is a environmental data frame of 16 sites - 4 variables.<br />

genet is a genetics data frame of 16 sites - 6 allele frequencies.<br />

contour is a data frame for background map (California map).<br />

McKechnie, S.W., Ehrlich, P.R. and White, R.R. (1975) Population genetics of Euphydryas butterflies.<br />

I. Genetic variation and the neutrality hypothesis. Genetics, 81, 571–594.<br />

References<br />

Manly, B.F. (1994) Multivariate Statistical Methods. A primer. Second edition. Chapman & Hall,<br />

London. 1–215.<br />

Examples<br />

data(butterfly)<br />

par(mfrow = c(2,2))<br />

s.label(butterfly$xy, contour = butterfly$contour, inc = FALSE)<br />

table.dist(dist(butterfly$xy), labels = row.names(butterfly$xy)) # depends of mva<br />

s.value(butterfly$xy, dudi.pca(butterfly$envir, scan = FALSE)$li[,1],<br />

contour = butterfly$contour, inc = FALSE, csi = 3)<br />

plot(mantel.randtest(dist(butterfly$xy), dist(butterfly$gen), 99),<br />

main = "genetic/spatial")<br />

par(mfrow = c(1,1))

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!