Wooldridge Source: B.D. Meyer, W.K. Viscusi, and D.L. Durbin (1995), “Workers’ Compensation and Injury Duration: Evidence from a Natural Experiment,” American Economic Review 85, 322-340. Professor Meyer kindly provided the data. Data loads lazily.
data('injury')A data.frame with 7150 observations on 30 variables:
durat: duration of benefits
afchnge: =1 if after change in benefits
highearn: =1 if high earner
male: =1 if male
married: =1 if married
hosp: =1 if inj. required hosp. stay
indust: industry
injtype: type of injury
age: age at time of injury
prewage: previous weekly wage, 1982 $
totmed: total med. costs, 1982 $
injdes: 4 digit injury description
benefit: real dollar value of benefit
ky: =1 for kentucky
mi: =1 for michigan
ldurat: log(durat)
afhigh: afchnge*highearn
lprewage: log(wage)
lage: log(age)
ltotmed: log(totmed); = 0 if totmed < 1
head: =1 if head injury
neck: =1 if neck injury
upextr: =1 if upper extremities injury
trunk: =1 if trunk injury
lowback: =1 if lower back injury
lowextr: =1 if lower extremities injury
occdis: =1 if occupational disease
manuf: =1 if manufacturing industry
construc: =1 if construction industry
highlpre: highearn*lprewage
https://www.cengage.com/cgi-wadsworth/course_products_wp.pl?fid=M20b&product_isbn_issn=9781111531041
This data set also can be used to illustrate the Chow test in Chapter 7. In particular, students can test whether the regression functions differ between Kentucky and Michigan. Or, allowing for different intercepts for the two states, do the slopes differ? A good lesson from this example is that a small R-squared is compatible with the ability to estimate the effects of a policy. Of course, for the Michigan data, which has a smaller sample size, the estimated effect is much less precise (but of virtually identical magnitude).
Used in Text: pages 458-459, 475-476
str(injury)
#> 'data.frame': 7150 obs. of 30 variables:
#> $ durat : num 1 1 84 4 1 1 7 2 175 60 ...
#> $ afchnge : int 1 1 1 1 1 1 1 1 1 1 ...
#> $ highearn: int 1 1 1 1 1 1 1 1 1 1 ...
#> $ male : int 1 1 1 1 1 1 1 1 1 1 ...
#> $ married : int 0 1 1 1 1 1 1 1 1 1 ...
#> $ hosp : int 1 0 1 1 0 0 0 1 1 1 ...
#> $ indust : int 3 3 3 3 3 3 3 3 3 3 ...
#> $ injtype : int 1 1 1 1 1 1 1 1 1 1 ...
#> $ age : int 26 31 37 31 23 34 35 45 41 33 ...
#> $ prewage : num 405 644 398 528 529 ...
#> $ totmed : num 1188 361 8964 1100 373 ...
#> $ injdes : int 1010 1404 1032 1940 1940 1425 1110 1207 1425 1010 ...
#> $ benefit : num 247 247 247 247 212 ...
#> $ ky : int 1 1 1 1 1 1 1 1 1 1 ...
#> $ mi : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ ldurat : num 0 0 4.43 1.39 0 ...
#> $ afhigh : int 1 1 1 1 1 1 1 1 1 1 ...
#> $ lprewage: num 6 6.47 5.99 6.27 6.27 ...
#> $ lage : num 3.26 3.43 3.61 3.43 3.14 ...
#> $ ltotmed : num 7.08 5.89 9.1 7 5.92 ...
#> $ head : int 1 1 1 1 1 1 1 1 1 1 ...
#> $ neck : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ upextr : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ trunk : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ lowback : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ lowextr : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ occdis : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ manuf : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ construc: int 0 0 0 0 0 0 0 0 0 0 ...
#> $ highlpre: num 6 6.47 5.99 6.27 6.27 ...
#> - attr(*, "time.stamp")= chr "25 Jun 2011 23:03"