Wooldridge Source: Christopher Lemmon, a former MSU undergraduate, collected these data from a survey he took of MSU students in Fall 1994. Data loads lazily.
data('gpa1')A data.frame with 141 observations on 29 variables:
age: in years
soph: =1 if sophomore
junior: =1 if junior
senior: =1 if senior
senior5: =1 if fifth year senior
male: =1 if male
campus: =1 if live on campus
business: =1 if business major
engineer: =1 if engineering major
colGPA: MSU GPA
hsGPA: high school GPA
ACT: 'achievement' score
job19: =1 if job <= 19 hours
job20: =1 if job >= 20 hours
drive: =1 if drive to campus
bike: =1 if bicycle to campus
walk: =1 if walk to campus
voluntr: =1 if do volunteer work
PC: =1 of pers computer at sch
greek: =1 if fraternity or sorority
car: =1 if own car
siblings: =1 if have siblings
bgfriend: =1 if boy- or girlfriend
clubs: =1 if belong to MSU club
skipped: avg lectures missed per week
alcohol: avg # days per week drink alc.
gradMI: =1 if Michigan high school
fathcoll: =1 if father college grad
mothcoll: =1 if mother college grad
https://www.cengage.com/cgi-wadsworth/course_products_wp.pl?fid=M20b&product_isbn_issn=9781111531041
This is a nice example of how students can obtain an original data set by focusing locally and carefully composing a survey.
Used in Text: pages 75, 77, 81, 129-130, 160, 232, 262, 295-296, 300-301
str(gpa1)
#> 'data.frame': 141 obs. of 29 variables:
#> $ age : int 21 21 20 19 20 20 22 22 22 19 ...
#> $ soph : int 0 0 0 1 0 0 0 0 0 1 ...
#> $ junior : int 0 0 1 0 1 0 0 0 0 0 ...
#> $ senior : int 1 1 0 0 0 1 0 0 0 0 ...
#> $ senior5 : int 0 0 0 0 0 0 1 1 1 0 ...
#> $ male : int 0 0 0 1 0 1 0 0 0 0 ...
#> $ campus : int 0 0 0 1 0 1 0 0 0 0 ...
#> $ business: int 1 1 1 1 1 1 1 0 0 1 ...
#> $ engineer: int 0 0 0 0 0 0 0 0 0 0 ...
#> $ colGPA : num 3 3.4 3 3.5 3.6 ...
#> $ hsGPA : num 3 3.2 3.6 3.5 3.9 ...
#> $ ACT : int 21 24 26 27 28 25 25 22 21 27 ...
#> $ job19 : int 0 0 1 1 0 0 0 1 1 1 ...
#> $ job20 : int 1 1 0 0 1 0 0 0 0 0 ...
#> $ drive : int 1 1 0 0 0 0 0 1 1 0 ...
#> $ bike : int 0 0 0 0 1 0 1 0 0 0 ...
#> $ walk : int 0 0 1 1 0 1 0 0 0 1 ...
#> $ voluntr : int 0 0 0 0 0 0 0 0 0 0 ...
#> $ PC : int 0 0 0 0 0 0 0 1 0 1 ...
#> $ greek : int 0 0 0 0 0 0 1 0 0 0 ...
#> $ car : int 1 1 1 0 1 1 1 0 1 0 ...
#> $ siblings: int 1 0 1 1 1 1 1 1 1 1 ...
#> $ bgfriend: int 0 1 0 0 1 0 0 1 1 0 ...
#> $ clubs : int 0 1 1 0 0 0 1 0 1 1 ...
#> $ skipped : num 2 0 0 0 0 0 0 3 2 0.5 ...
#> $ alcohol : num 1 1 1 0 1.5 0 2 3 2.5 0.75 ...
#> $ gradMI : int 1 1 1 0 1 0 1 1 1 1 ...
#> $ fathcoll: int 0 1 1 0 1 1 0 1 1 0 ...
#> $ mothcoll: int 0 1 1 0 0 0 1 1 1 1 ...
#> - attr(*, "time.stamp")= chr "25 Jun 2011 23:03"