Wooldridge Source: Terza, J.V. (2002), “Alcohol Abuse and Employment: A Second Look,” Journal of Applied Econometrics 17, 393-404. I obtained these data from the Journal of Applied Econometrics data archive at http://qed.econ.queensu.ca/jae/. Data loads lazily.
data('alcohol')
A data.frame with 9822 observations on 33 variables:
abuse: =1 if abuse alcohol
status: out of workforce = 1; unemployed = 2, employed = 3
unemrate: state unemployment rate
age: age in years
educ: years of schooling
married: =1 if married
famsize: family size
white: =1 if white
exhealth: =1 if in excellent health
vghealth: =1 if in very good health
goodhealth: =1 if in good health
fairhealth: =1 if in fair health
northeast: =1 if live in northeast
midwest: =1 if live in midwest
south: =1 if live in south
centcity: =1 if live in central city of MSA
outercity: =1 if in outer city of MSA
qrt1: =1 if interviewed in first quarter
qrt2: =1 if interviewed in second quarter
qrt3: =1 if interviewed in third quarter
beertax: state excise tax, $ per gallon
cigtax: state cigarette tax, cents per pack
ethanol: state per-capita ethanol consumption
mothalc: =1 if mother an alcoholic
fathalc: =1 if father an alcoholic
livealc: =1 if lived with alcoholic
inwf: =1 if status > 1
employ: =1 if employed
agesq: age^2
beertaxsq: beertax^2
cigtaxsq: cigtax^2
ethanolsq: ethanol^2
educsq: educ^2
https://www.cengage.com/cgi-wadsworth/course_products_wp.pl?fid=M20b&product_isbn_issn=9781111531041
page 629
#> 'data.frame': 9822 obs. of 33 variables: #> $ abuse : int 1 0 0 0 0 0 0 0 0 0 ... #> $ status : int 1 3 3 3 3 3 3 1 1 3 ... #> $ unemrate : num 4 4 4 3.3 3.3 ... #> $ age : int 50 37 53 59 43 38 34 45 47 31 ... #> $ educ : int 4 12 9 11 10 10 10 2 5 12 ... #> $ married : int 1 1 1 1 1 1 1 1 1 1 ... #> $ famsize : int 1 5 3 1 1 1 4 2 2 1 ... #> $ white : int 1 1 1 1 1 1 1 1 0 1 ... #> $ exhealth : int 0 0 1 1 1 1 0 0 0 1 ... #> $ vghealth : int 0 0 0 0 0 0 0 0 0 0 ... #> $ goodhealth: int 0 1 0 0 0 0 1 0 0 0 ... #> $ fairhealth: int 0 0 0 0 0 0 0 0 0 0 ... #> $ northeast : int 0 0 0 1 1 1 0 0 0 0 ... #> $ midwest : int 1 1 1 0 0 0 1 1 1 1 ... #> $ south : int 0 0 0 0 0 0 0 0 0 0 ... #> $ centcity : int 0 0 0 1 1 1 0 0 0 1 ... #> $ outercity : int 0 0 0 0 0 0 1 1 1 0 ... #> $ qrt1 : int 1 1 1 1 1 1 1 1 1 1 ... #> $ qrt2 : int 0 0 0 0 0 0 0 0 0 0 ... #> $ qrt3 : int 0 0 0 0 0 0 0 0 0 0 ... #> $ beertax : num 0.334 0.334 0.334 0.24 0.24 ... #> $ cigtax : num 38 38 38 26 26 26 20 20 20 20 ... #> $ ethanol : num 2.04 2.04 2.04 2.45 2.45 ... #> $ mothalc : int 0 0 0 0 0 0 0 0 0 0 ... #> $ fathalc : int 0 0 0 0 1 0 1 0 1 0 ... #> $ livealc : int 0 0 0 0 1 0 1 0 1 0 ... #> $ inwf : int 0 1 1 1 1 1 1 0 0 1 ... #> $ employ : int 0 1 1 1 1 1 1 0 0 1 ... #> $ agesq : int 2500 1369 2809 3481 1849 1444 1156 2025 2209 961 ... #> $ beertaxsq : num 0.1116 0.1116 0.1116 0.0576 0.0576 ... #> $ cigtaxsq : num 1444 1444 1444 676 676 ... #> $ ethanolsq : num 4.16 4.16 4.16 6 6 ... #> $ educsq : int 16 144 81 121 100 100 100 4 25 144 ... #> - attr(*, "time.stamp")= chr "22 Jan 2013 14:09"