Learn R Programming

ade4 (version 1.01)

microsatt: Genetic Relationships between cattle breeds with microsatellites

Description

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

Usage

data(microsatt)

Arguments

format

microsatt is a list of 4 components.
  1. tab
{contains the allelic frequencies for 18 cattle breeds (taurine or zebu,french or african) and 9 microsatellites.} loci.names{is a vector of the names of loci.} loci.eff{is a vector of the number of alleles per locus.} alleles.names{is a vector of the names of alleles.}

source

Extract of data prepared by D. Lalo" ugendla@dga2.jouy.inra.fr from data used in: Moazami-Goudarzi, K., D. Lalo", 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., Lalo" 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., Lalo" 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