binom2.rho(lrho = "rhobit", lmu = "probit", imu1 = NULL, imu2 = NULL,
irho = NULL, imethod = 1,
zero = 3, exchangeable = FALSE, nsimEIM = NULL)
binom2.Rho(rho = 0, imu1 = NULL, imu2 = NULL,
exchangeable = FALSE, nsimEIM = NULL)
Links
for more choices.NULL
means none.
Numerically, the $\rho$ parameter is easiest modelled as
an intercept only, hence the default.TRUE
, the two marginal probabilities are constrained to
be equal.CommonVGAMffArguments
for more information.
A value of at least 100 is recommended;
the larger the value the better."vglmff"
(see vglmff-class
).
The object is used by modelling functions such as vglm
,
and vgam
.
When fitted, the fitted.values
slot of the object contains the
four joint probabilities, labelled as
$(Y_1,Y_2)$ = (0,0), (0,1), (1,0), (1,1), respectively.
Explicitly, the default model is $$probit[P(Y_j=1)] = \eta_j,\ \ \ j=1,2$$ for the marginals, and $$rhobit[rho] = \eta_3.$$ The joint probability $P(Y_1=1,Y_2=1)=\Phi(\eta_1,\eta_2;\rho)$, and from these the other three joint probabilities are easily computed. The model is fitted by maximum likelihood estimation since the full likelihood is specified. Fisher scoring is implemented.
The default models $\eta_3$ as a single parameter only,
i.e., an intercept-only model for rho, but this can be circumvented by setting
zero = NULL
in order to model rho as a function of all the
explanatory variables.
The bivariate probit model should not be confused with a bivariate
logit model with a probit link (see binom2.or
).
The latter uses the odds ratio to quantify the association. Actually,
the bivariate logit model is recommended over the bivariate probit
model because the odds ratio is a more natural way of measuring the
association between two binary responses.
Freedman, D. A. (2010) Statistical Models and Causal Inference: a Dialogue with the Social Sciences, Cambridge: Cambridge University Press.
rbinom2.rho
,
rhobit
,
binom2.or
,
loglinb2
,
coalminers
,
binomialff
,
rhobit
,
fisherz
.coalminers = transform(coalminers, Age = (age - 42) / 5)
fit = vglm(cbind(nBnW,nBW,BnW,BW) ~ Age, binom2.rho, coalminers, trace = TRUE)
summary(fit)
coef(fit, matrix = TRUE)
Run the code above in your browser using DataLab