doubs {ade4} | R Documentation |
This data set gives environmental variables, fish species and spatial coordinates for 30 sites.
data(doubs)
doubs
is a list with 4 components.
is a data frame with 30 rows (sites) and 11 environmental variables.
is a data frame with 30 rows (sites) and 27 fish species.
is a data frame with 30 rows (sites) and 2 spatial coordinates.
is a data frame with 27 rows (species) and 4 columns (names).
The rows of doubs$env
, doubs$fish
and doubs$xy
are 30 sites along the Doubs, a French and Switzerland river.
doubs$env
contains the following variables:
dfs - distance from the source (km * 10),
alt - altitude (m),
slo (log(x + 1) where x is the slope (per mil * 100),
flo - minimum average stream flow (m3/s * 100),
pH (* 10),
har - total hardness of water (mg/l of Calcium),
pho - phosphates (mg/l * 100),
nit - nitrates (mg/l * 100),
amm - ammonia nitrogen (mg/l * 100),
oxy - dissolved oxygen (mg/l * 10),
bdo - biological demand for oxygen (mg/l * 10).
doubs$fish
contains the abundance of the following fish species: Cottus gobio (Cogo), Salmo trutta fario (Satr),
Phoxinus phoxinus (Phph), Nemacheilus barbatulus (Neba), Thymallus thymallus (Thth), Telestes soufia agassizi (Teso),
Chondrostoma nasus (Chna), Chondostroma toxostoma (Chto), Leuciscus leuciscus (Lele), Leuciscus cephalus cephalus (Lece),
Barbus barbus (Baba), Spirlinus bipunctatus (Spbi), Gobio gobio (Gogo), Esox lucius (Eslu),
Perca fluviatilis (Pefl), Rhodeus amarus (Rham), Lepomis gibbosus (Legi), Scardinius erythrophtalmus (Scer),
Cyprinus carpio (Cyca), Tinca tinca (Titi), Abramis brama (Abbr), Ictalurus melas (Icme),
Acerina cernua (Acce), Rutilus rutilus (Ruru), Blicca bjoerkna (Blbj), Alburnus alburnus (Alal),
Anguilla anguilla (Anan).
doubs$species
contains the names of the 27 fish species. The four columns correspond to: 1 = scientific name (Genus species), 2 = French common name, 3 = English common name, 4 = Four character code.
Verneaux, J. (1973) Cours d'eau de Franche-Comt? (Massif du Jura). Recherches ?cologiques sur le r?seau hydrographique du Doubs. Essai de biotypologie. Th?se d'?tat, Besan?on. 1–257.
See a French description of fish species at http://pbil.univ-lyon1.fr/R/pdf/pps047.pdf.
Chesse, D., Lebreton, J.D. and Yoccoz, N.G. (1987) Propri?t?s de l'analyse canonique des correspondances. Une illustration
en hydrobiologie. Revue de Statistique Appliqu?e, 35, 4, 55–72.
data(doubs) pca1 <- dudi.pca(doubs$env, scan = FALSE) pca2 <- dudi.pca(doubs$fish, scale = FALSE, scan = FALSE) coiner1 <- coinertia(pca1, pca2, scan = FALSE) if(adegraphicsLoaded()) { g1 <- s.corcircle(coiner1$aX, plot = F) g2 <- s.value(doubs$xy, coiner1$lX[, 1], plot = F) g3 <- s.value(doubs$xy, coiner1$lX[, 2], plot = F) g4 <- s.arrow(coiner1$c1, plot = F) g5 <- s.match(coiner1$mX, coiner1$mY, plot = F) g6 <- s.corcircle(coiner1$aY, plot = F) g7 <- s.arrow(coiner1$l1, plot = F) g8 <- s.value(doubs$xy, coiner1$lY[, 1], plot = F) g9 <- s.value(doubs$xy, coiner1$lY[, 2], plot = F) G <- ADEgS(list(g1, g2, g3, g4, g5, g6, g7, g8, g9), layout = c(3, 3)) } else { par(mfrow = c(3, 3)) s.corcircle(coiner1$aX) s.value(doubs$xy, coiner1$lX[, 1]) s.value(doubs$xy, coiner1$lX[, 2]) s.arrow(coiner1$c1) s.match(coiner1$mX, coiner1$mY) s.corcircle(coiner1$aY) s.arrow(coiner1$l1) s.value(doubs$xy, coiner1$lY[, 1]) s.value(doubs$xy, coiner1$lY[, 2]) par(mfrow = c(1, 1)) }