powered by
AA.Aa.aa(link = "logit", init.pA = NULL)
pA
Links
"vglmff"
vglmff-class
vglm
vgam
pA*pA
AB.Ab.aB.ab
AB.Ab.aB.ab2
ABO
G1G2G3
MNSs
y <- cbind(53, 95, 38) fit <- vglm(y ~ 1, AA.Aa.aa(link = "probit"), trace = TRUE) rbind(y, sum(y) * fitted(fit)) Coef(fit) # Estimated pA summary(fit)
Run the code above in your browser using DataLab