library(RCPA3)
if (FALSE) {
model_full <- logregC(battleground2020 ~ vep16.turnout + adv.or.more, data=states)
model_reduced <- logregC(battleground2020 ~ vep16.turnout, data=states)
pchisqC(reduced=model_reduced, full=model_full)
}
Run the code above in your browser using DataLab