R/Data.R

In matloff/partools: Tools for the 'Parallel' Package

# 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
}