# SPSS Data

library(foreign)

D.00 <- read.spss("Table 15.1 Input.sav", use.value.labels=FALSE, to.data.frame=TRUE)

library(Rcmdr)