Pythagoras Tree

Author

Eric W. Weisstein
February 2, 2011

This notebook downloaded from http://mathworld.wolfram.com/notebooks/Fractals/PythagorasTree.nb.

For more information, see Eric's MathWorld entry http://mathworld.wolfram.com/PythagorasTree.html.

©2010 Wolfram Research, Inc. except for portions noted otherwise

Figures

V5

Show[GraphicsArray[Map[Graphics[#,AspectRatio->Automatic]&,
{
PythagorasTree/@Range[0,3],
PythagorasTree[#,3]&/@Range[0,3]
},{2}]],ImageSize->500]

V6

GraphicsGrid[Map[Graphics,{
PythagorasTree/@Range[0,3],
PythagorasTree[#,3]&/@Range[0,3]
},{2}]]