Let's say I have a rather large adjacency matrix for a partial order relation. Say an 80x80 matrix. What is the best way to display Hasse diagram? I have tried AdjacencyGraph and it does a not so bad job of displaying the graph, but it is definitely not a "good" Hasse diagram. Any help would be greatly appreciated!

EDIT

I was successfully able to draw the graph using

Needs["Combinatorica"];
Hasse = ShowGraph[HasseDiagram[FromAdjacencyMatrix[hasseMatrix, Type -> Directed]]]


after using the information from the answer @Dr.belisarius gave.

• Take a look at HasseDiagram[ ] on the Combinatorica package – Dr. belisarius Jan 21 '16 at 5:27
• reference.wolfram.com/mathematica/Combinatorica/tutorial/… – Dr. belisarius Jan 21 '16 at 5:29
• I have tried to use HasseDiagram[], but for whatever reason it just spits HasseDiagram[insert.graph.here] as output. Perhaps I am not loading Combinatorica correctly? – jix816 Jan 21 '16 at 5:40
• If you work on this, sooner or later you will come across the function TransitiveReductionGraph. I wanted to warn you now that that function is known to be buggy. Check the link to determine whether the bug would affect your results. – Szabolcs Jan 21 '16 at 8:56

SeedRandom@42;
g = SystemRandomGraph[{9, 7}, VertexLabels -> "Name"];