https://github.com/cran/HardyWeinberg
Raw File
Tip revision: 376ae7b969067599759d960a153939a6fcaee31a authored by Jan Graffelman on 17 November 2021, 10:50:09 UTC
version 1.7.3
Tip revision: 376ae7b
AuxQ.R
AuxQ <-
function(p,nm,nA,nAf) {
  y <- 2*p*nm - nA + nAf
  return(y)
}
back to top