Podcast #128: We chat with Kent C Dodds about why he loves React and discuss what life was like in the dark days before Git. Listen now.

New answers tagged

4

Reversing the graph and reformatting the nodes should get you started: ClearAll[hasseF] vf[{xc_, yc_}, name_, {w_, h_}] := Text[Grid[name, Dividers -> {False, True}], {xc, yc}]; hasseF = ReverseGraph@*TransitiveReductionGraph@*RelationGraph hasseF[ SubsetQ, Subsets[{{M1, W1}, {M1, W2}, {M2, W1}, {M2, W2}}], VertexShapeFunction -> vf ] Edit: @...


Top 50 recent answers are included