Learn R Programming

ade4 (version 1.2-2)

microsatt: Genetic Relationships between cattle breeds with microsatellites

Description

This data set gives genetic relationships between cattle breeds with microsatellites.

Usage

data(microsatt)

Arguments

source

Extract of data prepared by D. Laloe ugendla@dga2.jouy.inra.fr from data used in:

Moazami-Goudarzi, K., D. Laloe, J. P. Furet, and F. Grosclaude. 1997. Analysis of genetic relationships between 10 cattle breeds with 17 microsatellites. Animal Genetics, 28, 338--345.

Souvenir Zafindrajaona, P.,Zeuh V. ,Moazami-Goudarzi K., Laloe D., Bourzat D., Idriss A., and Grosclaude F. (1999) Etude du statut phylog�n�tique du bovin Kouri du lac Tchad � l'aide de marqueurs mol�culaires. Revue d'Elevage et de M�decine V�t�rinaire des pays Tropicaux, 55, 155--162.

Moazami-Goudarzi, K., Belemsaga D. M. A., Ceriotti G., Laloe D. , Fagbohoun F., Kouagou N. T., Sidib� I., Codjia V., Crimella M. C., Grosclaude F. and Tour� S. M. (2001) Caract�risation de la race bovine Somba � l'aide de marqueurs mol�culaires. Revue d'Elevage et de M�decine V�t�rinaire des pays Tropicaux, 54, 1--10.

Examples

Run this code
data(microsatt)
fac <- factor(rep(microsatt$loci.names, microsatt$loci.eff))
w <- dudi.coa(data.frame(t(microsatt$tab)), scann = FALSE)
wit <- within(w, fac, scann = FALSE)
microsatt.ktab <- ktab.within(wit)

plot(sepan(microsatt.ktab)) # 9 separated correspondence analyses
plot(mcoa(microsatt.ktab, scan = FALSE))
plot(mfa(microsatt.ktab, scan = FALSE))
plot(statis(microsatt.ktab, scan = FALSE))

Run the code above in your browser using DataLab