Tournament Matrix

Author

Eric W. Weisstein
June 3, 2004

This notebook downloaded from http://mathworld.wolfram.com/notebooks/GraphTheory/TournamentMatrix.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/TournamentMatrix.html.

©2005 Wolfram Research, Inc. except for portions noted otherwise

Code

Tournaments[n_]:=Select[ListGraphs[n,Binomial[n,2],Directed],CompleteQ[MakeUndirected[#]]&]

Figures

ShowGraphArray[Tournaments[3]]

t3=((ToAdjacencyMatrix[#]/.(0->-1))+IdentityMatrix[V[#]])&/@Tournaments[3]

MatrixForm/@t3

t=t3[[2]]

t+Transpose[t]