https://github.com/cran/HardyWeinberg
Raw File
Tip revision: 2bc8b77624f39b6c1eeca2decd1232a97576c51c authored by Jan Graffelman on 29 June 2019, 03:50:29 UTC
version 1.6.3
Tip revision: 2bc8b77
AuxQ.R
AuxQ <-
function(p,nm,nA,nAf) {
  y <- 2*p*nm - nA + nAf
  return(y)
}
back to top