coef.DiSSMod {DiSSMod} | R Documentation |
Getting Coefficients of Discrete Sample Selection Model Fits
Description
coef
method for a class "DiSSMod"
.
Usage
## S3 method for class 'DiSSMod'
coef(object, only = NULL, ...)
Arguments
object |
an object of class "DiSSMod" made by the function |
only |
a character value for choosing specific variable's coefficients. Initial value is |
... |
not used, but exists because of the compatibility.
|
Details
It looks as similar as the generic function coef
, but this case there
are two equations. Therefore, there exist little differences.
Value
a numeric vector or a list is given.
See Also
Examples
# example continued from DiSSMod
set.seed(45)
data(DoctorRWM, package = "DiSSMod")
n0 <- 600
set.n0 <- sample(1:nrow(DoctorRWM), n0)
reduce_DoctorRWM <- DoctorRWM[set.n0,]
result0 <- DiSSMod(response = as.numeric(DOCVIS > 0) ~ AGE + INCOME_SCALE + HHKIDS + EDUC + MARRIED,
selection = PUBLIC ~ AGE + EDUC + FEMALE,
data = reduce_DoctorRWM, resp.dist="bernoulli", select.dist = "normal",
alpha = seq(-5.5, -0.5, length.out = 21), standard = TRUE)
coef(result0)
data(CreditMDR, package = "DiSSMod")
n1 <- 600
set.n1 <- sample(1:nrow(CreditMDR), n1)
reduce_CreditMDR <- CreditMDR[set.n1,]
result1 <- DiSSMod(response = MAJORDRG ~ AGE + INCOME + EXP_INC,
selection = CARDHLDR ~ AGE + INCOME + OWNRENT + ADEPCNT + SELFEMPL,
data = reduce_CreditMDR, resp.dist="poi", select.dist = "logis",
alpha = seq(-0.3, 0.3,length.out = 21), standard = FALSE, verbose = 1)
coef(result1)
[Package DiSSMod version 1.0.0 Index]