data(ccdata)
fit <- blm(y~female+packyear,data = ccdata,
weight = ccdata$w, strata = ccdata$strata)
summary(fit)
fit.lexpit <- lexpit(y~female, y~packyear,data = ccdata,
weight = ccdata$w, strata = ccdata$strata)
summary(fit.lexpit)
Run the code above in your browser using DataLab