# NOT RUN {
## APS regression predicting miles per gallon based
## on vehicle weight, type of
## carborator, & number of engine cylinders
apsOut<-aps(mtcars,"mpg",list("wt","carb","cyl"))
## APS regression predicting paragraph comprehension based
## on thre verbal tests: general info, sentence comprehension,
## & word classification
## Use HS dataset in MBESS
require ("MBESS")
data(HS)
## APS
apsOut<-aps(HS,"t6_paragraph_comprehension",list("t5_general_information","t7_sentence",
"t8_word_classification"))
# }
Run the code above in your browser using DataLab