Five Disks Problem

Author

Eric W. Weisstein
March 6, 2012

This notebook downloaded from http://mathworld.wolfram.com/notebooks/PlaneGeometry/FiveDisksProblem.nb.

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

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

Plot

V5

Show[Graphics[{{{Hue[.5],Disk[{0,0},1]},Circle[{0,0},1]},Table[Circle[Through[{Cos,Sin}[2Pi i/5]]/GoldenRatio,1/GoldenRatio],{i,1,5}]}],
AspectRatio->Automatic,ImageSize->200
]

V6

Graphics[{{{Hue[.5],Disk[{0,0},1]},Circle[{0,0},1]},Table[Circle[Through[{Cos,Sin}[2Pi i/5]]/GoldenRatio,1/GoldenRatio],{i,1,5}]}]