Triangular Pyramid

Author

Eric W. Weisstein
November 9, 2003

This notebook downloaded from http://mathworld.wolfram.com/notebooks/Polyhedra/TriangularPyramid.nb.

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

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

Graphic

Show[Graphics3D[Pyramid[3,1.4]],Boxed->False,ViewPoint->{0,2,2}]

LiveGraphics3D

<<Utilities`LiveGraphics3D`

WriteLiveForm["tripyr.m",Show[Graphics3D[Pyramid[3,1.4]],Boxed->False,ViewPoint->{0,2,2}]
]

Wireframe

Show[Graphics[HiddenWireframe[Pyramid[3,1.4],ViewPoint->{0,2,2},BoxRatios->{1,1,1.4}]],AspectRatio->Automatic]

Edge Length

FullSimplify[Sqrt[h^2+a^2 Csc[Pi/n]^2/4]/.n->3]

Slant Height

FullSimplify[Sqrt[h^2+a^2 Cot[Pi/n]^2/4]/.n->3]

Surface Area

FullSimplify[(1/4) a n (a Cot[(π/n)]+(Sqrt[4 (h^2)+(a^2) ((Cot[(π/n)])^2)]))/.n->3]