Minkowski Sausage

Author

Eric W. Weisstein
February 3, 2011

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

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

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

Graphics

V5

FractalMotif[MinkowskiMotif]

FractalDrawArray[Minkowski,{0,4}]

V6

GraphicsColumn[{
GraphicsRow[Minkowski/@Range[0,4]],
GraphicsRow[FractalMotif[MinkowskiMotif]]
},Spacings->-200]

Dimension

-Limit[((Log[4 (3^n)])/(Log[((Sqrt[5])^(-n))])),n->∞]

Log[5,9]

N[%]

((2Log[3])/(Log[5]))//N