Wooldridge Data loads lazily.
data('happiness')
A data.frame with 17137 observations on 33 variables:
year: gss year for this respondent
workstat: work force status
prestige: occupational prestige score
divorce: ever been divorced or separated
widowed: ever been widowed
educ: highest year of school completed
reg16: region of residence, age 16
babies: household members less than 6 yrs old
preteen: household members 6 thru 12 yrs old
teens: household members 13 thru 17 yrs old
income: total family income
region: region of interview
attend: how often r attends religious services
happy: general happiness
owngun: =1 if own gun
tvhours: hours per day watching tv
vhappy: =1 if 'very happy'
mothfath16: =1 if live with mother and father at 16
black: =1 if black
gwbush04: =1 if voted for G.W. Bush in 2004
female: =1 if female
blackfemale: black*female
gwbush00: =1 if voted for G.W. Bush in 2000
occattend: =1 if attend is 3, 4, or 5
regattend: =1 if attend is 6, 7, or 8
y94: =1 if year == 1994
y96:
y98:
y00:
y02:
y04:
y06: =1 if year == 2006
unem10: =1 if unemployed in last 10 years
https://www.cengage.com/cgi-wadsworth/course_products_wp.pl?fid=M20b&product_isbn_issn=9781111531041
NA
#> 'data.frame': 17137 obs. of 33 variables: #> $ year : int 1994 1994 1994 1994 1994 1994 1994 1994 1994 1994 ... #> $ workstat : Factor w/ 10 levels "iap","working fulltime",..: 8 2 2 2 3 3 2 2 2 2 ... #> $ prestige : int 46 22 29 42 36 43 20 44 42 46 ... #> $ divorce : Factor w/ 5 levels "iap","yes","no",..: NA 3 3 2 NA NA 3 NA 3 NA ... #> $ widowed : Factor w/ 5 levels "iap","yes","no",..: 1 1 1 1 NA NA NA NA NA 1 ... #> $ educ : int 12 12 12 8 13 15 9 12 12 12 ... #> $ reg16 : Factor w/ 10 levels "foreign","new england",..: 3 1 1 1 3 3 3 1 1 3 ... #> $ babies : int 2 0 0 0 0 0 0 0 2 0 ... #> $ preteen : int 3 0 0 0 1 0 1 0 1 0 ... #> $ teens : int 0 0 0 0 1 0 1 0 0 1 ... #> $ income : Factor w/ 16 levels "iap","lt $1000",..: 10 NA 11 11 10 13 12 10 13 11 ... #> $ region : Factor w/ 10 levels "not assigned",..: 3 3 3 3 3 3 3 3 3 3 ... #> $ attend : Factor w/ 10 levels "never","lt once a year",..: 4 8 9 3 3 4 9 9 4 9 ... #> $ happy : Factor w/ 6 levels "iap","very happy",..: 3 2 3 4 4 3 4 2 3 3 ... #> $ owngun : Factor w/ 6 levels "iap","yes","no",..: NA NA 1 NA 1 1 1 NA 1 1 ... #> $ tvhours : int 2 3 1 3 NA 0 10 4 2 NA ... #> $ vhappy : int 0 1 0 0 0 0 0 1 0 0 ... #> $ mothfath16 : int 1 0 0 0 0 0 1 1 0 1 ... #> $ black : int 1 1 1 0 1 1 0 1 1 1 ... #> $ gwbush04 : int NA NA NA NA NA NA NA NA NA NA ... #> $ female : int 1 0 1 0 1 1 1 0 1 1 ... #> $ blackfemale: int 1 0 1 0 1 1 0 0 1 1 ... #> $ gwbush00 : int NA NA NA NA NA NA NA NA NA NA ... #> $ occattend : int 1 0 0 0 0 1 0 0 1 0 ... #> $ regattend : int 0 0 1 0 0 0 1 1 0 1 ... #> $ y94 : int 1 1 1 1 1 1 1 1 1 1 ... #> $ y96 : int 0 0 0 0 0 0 0 0 0 0 ... #> $ y98 : int 0 0 0 0 0 0 0 0 0 0 ... #> $ y00 : int 0 0 0 0 0 0 0 0 0 0 ... #> $ y02 : int 0 0 0 0 0 0 0 0 0 0 ... #> $ y04 : int 0 0 0 0 0 0 0 0 0 0 ... #> $ y06 : int 0 0 0 0 0 0 0 0 0 0 ... #> $ unem10 : int 1 0 NA 1 0 NA NA 0 NA 1 ... #> - attr(*, "time.stamp")= chr "22 Jan 2013 14:09" #> - attr(*, "label.table")=List of 15 #> ..$ wrkstat : Named num [1:10] 0 1 2 3 4 5 6 7 8 9 #> .. ..- attr(*, "names")= chr [1:10] "iap" "working fulltime" "working parttime" "temp not working" ... #> ..$ prestg80: Named num 0 #> .. ..- attr(*, "names")= chr "dk,na,iap" #> ..$ divorce : Named num [1:5] 0 1 2 8 9 #> .. ..- attr(*, "names")= chr [1:5] "iap" "yes" "no" "dk" ... #> ..$ widowed : Named num [1:5] 0 1 2 8 9 #> .. ..- attr(*, "names")= chr [1:5] "iap" "yes" "no" "dk" ... #> ..$ educ : Named num [1:3] 97 98 99 #> .. ..- attr(*, "names")= chr [1:3] "iap" "dk" "na" #> ..$ reg16 : Named num [1:10] 0 1 2 3 4 5 6 7 8 9 #> .. ..- attr(*, "names")= chr [1:10] "foreign" "new england" "middle atlantic" "e. nor. central" ... #> ..$ babies : Named num [1:2] 8 9 #> .. ..- attr(*, "names")= chr [1:2] "8 or more" "na" #> ..$ preteen : Named num [1:2] 8 9 #> .. ..- attr(*, "names")= chr [1:2] "8 or more" "na" #> ..$ teens : Named num [1:2] 8 9 #> .. ..- attr(*, "names")= chr [1:2] "8 or more" "na" #> ..$ income : Named num [1:16] 0 1 2 3 4 5 6 7 8 9 ... #> .. ..- attr(*, "names")= chr [1:16] "iap" "lt $1000" "$1000 to 2999" "$3000 to 3999" ... #> ..$ region : Named num [1:10] 0 1 2 3 4 5 6 7 8 9 #> .. ..- attr(*, "names")= chr [1:10] "not assigned" "new england" "middle atlantic" "e. nor. central" ... #> ..$ attend : Named num [1:10] 0 1 2 3 4 5 6 7 8 9 #> .. ..- attr(*, "names")= chr [1:10] "never" "lt once a year" "once a year" "sevrl times a yr" ... #> ..$ happy : Named num [1:6] 0 1 2 3 8 9 #> .. ..- attr(*, "names")= chr [1:6] "iap" "very happy" "pretty happy" "not too happy" ... #> ..$ owngun : Named num [1:6] 0 1 2 3 8 9 #> .. ..- attr(*, "names")= chr [1:6] "iap" "yes" "no" "refused" ... #> ..$ tvhours : Named num [1:3] -1 98 99 #> .. ..- attr(*, "names")= chr [1:3] "iap" "dk" "na"