Prev: ODE solution transfer
Next: graphics3d listanimate
From: janos on 31 Jul 2010 02:43
Do I see well that both solutions are wrong?

<< Combinatorica`

ToAdjacencyMatrix[
TransitiveClosure[
FromOrderedPairs[{{1, 2}, {2, 3}, {3, 1}}]]] // MatrixForm

{{1, 2, 2}, {0, 1, 2}, {0, 0, 1}}

ToOrderedPairs[
TransitiveClosure[FromOrderedPairs[{{1, 2}, {2, 3}, {3, 1}}]]]

{{1, 1}, {1, 2}, {1, 3}, {1, 2}, {2, 2}, {2, 3}, {1, 3}, {2, 3}, {3,
3}}

J=E1nos

 | 
Pages: 1
Prev: ODE solution transfer
Next: graphics3d listanimate