NELS {copulaData}

National Education Longitudinal Study Data

Description

Random sample of size 1000 from the US National Education Longitudinal Study (NELS) data containing the mathematics, science and reading scores, together with covariates, of 8th graders in 1988.

Usage

data("NELS88")

Format

data.frame containing the identification number of the school to which the student belongs (ID), the standardized score of the student on a mathematics achievement test (Math; rescaled by an Item Response Theory (IRT) method where a higher score indicates greater proficiency in mathematics), the standardized score of the student on a science achievement test (Science), the standardized score of the student on a reading achievement test (Reading), a factor indicating whether the student is a member of an ethnic minority group (Minority), a numeric measure of the socio-economic status of the student and family (SES), a factor indicating whether the student is female (Female), a factor indicating whether the school is publicly funded (Public), the size of the student's school (Size), a factor indicating whether the school is located in an urban environment (Urban) and a factor indicating whether the school is located in a rural environment (Rural).

Source

Edward W. Frees, ‘Student Achievement Data’ in https://sites.google.com/a/wisc.edu/jed-frees/tutorial-multivariate-regression-using-copulas.

Originally, the National Center for Education Statistics page, https://nces.ed.gov/surveys/nels88/

Examples

data("NELS88")
str(NELS88)
ftable(xtabs(~ Urban+Rural + Public, NELS88))#
## Add more sensible variable, ordered factor rural < agglo < urban
NELS88. <- within(NELS88, {
       UR <- factor(Urban:Rural, labels = c("agglo", "rural", "urban"))
      Urbanity <- ordered(UR, levels = c("rural", "agglo", "urban"))
      rm(UR) })
unique(NELS88.[, c("Urban","Rural", "Urbanity")]) # indeed, just 3 combination cases

xtabs(~ Minority+Urbanity, NELS88.) # (_not_ independent)
ftable(xtabs(~ Public+Urbanity+Female+Minority, NELS88.) -> tab.)
summary(tab.) # very very clearly not independent