data(govRace10)
data(govRace10) table(govRace10[,c("party1", "party2")])
Run the code above in your browser using DataLab