R/Data.R

Defines functions getPE1

# routines to load and prep common datasets

# prgeng data

# better version in regtools package

getPE1 <- function() 
{
   data(prgeng)
   pe <- prgeng[,c(1,3,7:9)]
   # dummies for MS, PhD
   pe$ms <- as.integer(pe$educ == 14)
   pe$phd <- as.integer(pe$educ == 16)
   pe$educ <- NULL
   pe <<- pe
}
matloff/partools documentation built on May 21, 2019, 12:56 p.m.