DAAG (version 0.37)

nsw74psidA: A Subset of the nsw74psid1 Data Set

Description

The nsw74psidA data frame has 252 rows and 10 columns. See nsw74psid1 for more information.

Usage

data(nsw74psidA)

Details

This data set was obtained using:

here <- age <= 40="" &="" re74<="5000" re75="" <="5000" re78="" 30000<="" code=""> nsw74psidA <- nsw74psid1[here, ]

Examples

data(nsw74psidA)
table(nsw74psidA$trt)


A1.lm <- lm(re78 ~ trt + (age + educ + re74 + re75) + (black +
      hisp + marr + nodeg), data = nsw74psidA)
summary(A1.lm)$coef

discA.glm <- glm(formula = trt ~ age + educ + black + hisp +
  marr + nodeg + re74 + re75, family = binomial, data = nsw74psidA)
A.scores <- predict(discA.glm)

options(digits=4)
overlap <- A.scores > -3.5 & A.scores < 3.8
A.lm <- lm(re78 ~ trt + A.scores, data=nsw74psidA, subset = overlap)
summary(A.lm)$coef