Wooldridge Source: The subset of data for black or Hispanic women used in J.A. Angrist and W.E. Evans (1998) Data loads lazily.
data('labsup')A data.frame with 31857 observations on 20 variables:
kids: number of kids
morekids: had more than 2 kids
boys2: first two births boys
girls2: first two births girls
boy1st: first birth boy
boy2nd: second birth boy
samesex: first two kids are of same sex
multi2nd: =1 if 2nd birth is twin
age: age of mom
agefstm: age of mom at first birth
black: =1 of black
hispan: =1 if hispanic
worked: mom worked last year
weeks: weeks worked mom
hours: hours of work per week, mom
labinc: mom's labor income, $1000s
faminc: family income, $1000s
nonmomi: 'non-mom' income, $1000s
educ: mom's years of education
agesq:
This example can promote an interesting discussion of instrument validity, and in particular, how a variable that is beyond our control – for example, whether the first two children have the same gender – can, nevertheless, affect subsequent economic choices. Students are asked to think about such issues in Computer Exercise C13 in Chapter 15. A more egregious version of this mistake would be to treat a variable such as age as a suitable instrument because it is beyond our control: clearly age has a direct effect on many economic outcomes that would play the role of the dependent variable.
Used in Text: pages 530-531
str(labsup)
#> 'data.frame': 31857 obs. of 20 variables:
#> $ kids : int 2 3 2 2 2 2 3 3 2 2 ...
#> $ morekids: int 0 1 0 0 0 0 1 1 0 0 ...
#> $ boys2 : int 0 0 1 0 0 0 0 1 0 0 ...
#> $ girls2 : int 0 0 0 0 1 0 0 0 0 0 ...
#> $ boy1st : int 1 0 1 1 0 1 1 1 0 1 ...
#> $ boy2nd : int 0 1 1 0 0 0 0 1 1 0 ...
#> $ samesex : int 0 0 1 0 1 0 0 1 0 0 ...
#> $ multi2nd: int 0 0 0 0 0 0 0 0 0 0 ...
#> $ age : int 35 32 30 33 31 35 28 30 23 32 ...
#> $ agefstm : int 27 20 19 23 26 24 18 19 19 22 ...
#> $ black : int 1 1 1 1 1 1 1 1 1 1 ...
#> $ hispan : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ worked : int 0 1 1 1 1 1 1 1 1 1 ...
#> $ weeks : int 0 40 52 50 26 52 52 52 52 52 ...
#> $ hours : int 0 40 35 40 48 40 40 40 35 40 ...
#> $ labinc : num 0 14.7 20.2 21 21.9 ...
#> $ faminc : num 44.5 38 20.6 84 88.8 ...
#> $ nonmomi : num 44.45 23.34 0.43 62.99 66.96 ...
#> $ educ : int 14 12 12 14 12 16 16 12 12 12 ...
#> $ agesq : num 1225 1024 900 1089 961 ...
#> - attr(*, "time.stamp")= chr " 9 Mar 2007 12:14"
#> - attr(*, "label.table")= list()
#> - attr(*, "expansion.fields")= list()
#> - attr(*, "byteorder")= int 2
#> - attr(*, "orig.dim")= int [1:2] 31857 20