data(city)
condorcet(city[,"city"], colnames(city)) # among city-dwellers
condorcet(city[,"suburb"], colnames(city)) # among suburb-dwellers
condorcet(city[,"country"], colnames(city)) # among country-dwellers
condorcet(rowSums(city), colnames(city)) # overall winner
Run the code above in your browser using DataLab