Exact Test of Hardy-Weinberg Equilibrium for 2-Allele Markers
Exact test of Hardy-Weinberg Equilibrium for 2 Allele Markers.
HWE.exact(x)
x |
Genotype object |
Object of class 'htest'.
This function only works for genotypes with exactly 2 alleles.
David Duffy davidD@qimr.edu.au with modifications by Gregory R. Warnes greg@warnes.net
Emigh TH. (1980) "Comparison of tests for Hardy-Weinberg Equilibrium", Biometrics, 36, 627-642.
example.data <- c("D/D","D/I","D/D","I/I","D/D",
"D/D","D/D","D/D","I/I","")
g1 <- genotype(example.data)
g1
HWE.exact(g1)
# compare with
HWE.chisq(g1)
g2 <- genotype(sample( c("A","C"), 100, p=c(100,10), rep=TRUE),
sample( c("A","C"), 100, p=c(100,10), rep=TRUE) )
HWE.exact(g2)Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.