meatReg(x, which, ...)
zipath
object with family="negbin"
estfunReg
function.sandwichReg
, breadReg
, estfunReg
data("bioChemists", package = "pscl")
fm_zinb <- zipath(art ~ . | ., data = bioChemists, family = "negbin", nlambda=10)
meatReg(fm_zinb, which=which.min(fm_zinb$bic))
Run the code above in your browser using DataLab