summary(result)
Call:
svyglm(Injury ~ seat, sD, family = quasibinomial(link = "logit"))
Survey design:
svydesign(~1, prob = NULL, strata = Data[, 1], weights = Data[,
4], data = Data, fpc = ~fPc)
Coefficients:
Estimate Std. Error t value Pr(>|t|)
(Intercept) -4.256875 0.001421 -2996.7 <2e-16 ***
seatbad 0.681504 0.001689 403.4 <2e-16 ***
---
Signif. codes: 0 *** 0.001 ** 0.01 * 0.05 . 0.1 1
(Dispersion parameter for quasibinomial family taken to be 1.000095)
Number of Fisher Scoring iterations: 6
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
