# NOT RUN {
data(ANES2016)
summary(ANES2016)
PAsso_2v <- PAsso(responses = c("PreVote.num", "PID"),
adjustments = c("income.num", "age", "edu.year"),
data = ANES2016)
plot(PAsso_2v)
# }
Run the code above in your browser using DataLab