Anonymous user
Visualize a tree: Difference between revisions
m
→Tree graph: ditto; remove empty lines
m (→Opener view: drop heading level) |
m (→Tree graph: ditto; remove empty lines) |
||
Line 380:
=== Tree graph ===
Make a tree graph. In Mathematica, '''\[DirectedEdge]''' will appear as an arrow.
▲ edges = {1 \[DirectedEdge] 2, 1 \[DirectedEdge] 3, 2 \[DirectedEdge] 4, 2 \[DirectedEdge] 5,
3 \[DirectedEdge] 6, 4 \[DirectedEdge] 7};
[[File:Tree.jpg]]
Line 395 ⟶ 391:
Show the syntactical structure of the above code. '''Defer''' is added to impede '''TreeGraph''' from becoming a graphical object.
<lang Mathematica>TreeForm[Defer@
TreeGraph[{1 \[DirectedEdge] 2, 1 \[DirectedEdge] 3, 2 \[DirectedEdge] 4, 2 \[DirectedEdge] 5,
3 \[DirectedEdge] 6, 4 \[DirectedEdge] 7}, VertexLabels -> "Name"]]</lang>
[[File:syntax.jpg]]
Line 408 ⟶ 402:
Here's another way to display a tree. The triangles open/close when clicked on.
<lang Mathematica>OpenerView[{1, Column@{OpenerView[{2, Column@{OpenerView[{4, 7}, True], 5}}, True],▼
▲OpenerView[{1, Column@{OpenerView[{2, Column@{OpenerView[{4, 7}, True], 5}}, True],
OpenerView[{3, OpenerView[{TraditionalForm[Cos[x]], Plot[Cos[x], {x, 0, 10}, ImageSize -> 150]},
True]}, True]}}, True]</lang>
[[File:opener.jpg]]
| |||