Dodecagon

Author

Eric W. Weisstein
March 4, 2004

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

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

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

Figure

Show[Graphics[RegularPolygon[12],AspectRatio->Automatic]]

Properties

TableForm[RegularPolygonInformation[12]//Simplify,TableDepth->2]

Inequality

<<Graphics`InequalityGraphics`

InequalityPlot[#<1.,{x},{y},Ticks->None,PlotLabel->TraditionalForm[#<1]]&[2(Abs[x]+Abs[y])+Abs[(Sqrt[3]) x-y]+Abs[(Sqrt[3]) x+y]+Abs[x-(Sqrt[3]) y]+Abs[x+(Sqrt[3]) y]]