pub fn infert() -> Result<DataFrame, PolarsError>
Expand description
§Infertility after Spontaneous and Induced Abortion
§Description:
This is a matched case-control study dating from before the availability of conditional logistic regression.
§Usage:
infert
§Format:
- Education
- 0 = 0-5 years
- 1 = 6-11 years
- 2 = 12+ years
- age age in years of case
- parity count
- number of prior induced abortions
- 0 = 0
- 1 = 1
- 2 = 2 or more
- case status
- 1 = case
- 0 = control
- number of prior spontaneous abortions
- 0 = 0
- 1 = 1
- 2 = 2 or more
- matched set number 1-83
- stratum number 1-63
§Note:
One case with two prior spontaneous abortions and two prior induced abortions is omitted.
§Source:
Trichopoulos et al (1976) Br. J. of Obst. and Gynaec. 83, 645-650.
§Examples:
require(stats)
model1 <- glm(case ~ spontaneous+induced, data = infert, family = binomial())
summary(model1)
## adjusted for other potential confounders:
summary(model2 <- glm(case ~ age+parity+education+spontaneous+induced,
data = infert, family = binomial()))
## Really should be analysed by conditional logistic regression
## which is in the survival package
if(require(survival)){
model3 <- clogit(case ~ spontaneous+induced+strata(stratum), data = infert)
print(summary(model3))
detach() # survival (conflicts)
}