Return to Answer

refactor

Source Link

edited Feb 6, 2016 at 7:00

framedWithColor[color_] := Function[{position, label},
  {Text[Framed[label, Background -> color], position]}
];

TreeForm[
  {{1, 2}, {3, 4}},
  VertexRenderingFunction -> ({
    Text[Framed[#2, Background -> LightBlue], #1]
  }&)framedWithColor[Pink]
]

TreeForm[
  {{1, 2}, {3, 4}},
  VertexRenderingFunction -> ({
    Text[Framed[#2, Background -> LightBlue], #1]
  }&)
]

framedWithColor[color_] := Function[{position, label},
  {Text[Framed[label, Background -> color], position]}
];

TreeForm[
  {{1, 2}, {3, 4}},
  VertexRenderingFunction -> framedWithColor[Pink]
]

Source Link

created Feb 6, 2016 at 6:43

Pegasus Roe

TreeForm[
  {{1, 2}, {3, 4}},
  VertexRenderingFunction -> ({
    Text[Framed[#2, Background -> LightBlue], #1]
  }&)
]