A377298 Decimal expansion of the surface area of a truncated cube with unit edge length.

3, 2, 4, 3, 4, 6, 6, 4, 3, 6, 3, 6, 1, 4, 8, 9, 5, 1, 7, 2, 6, 7, 5, 1, 5, 7, 3, 7, 3, 5, 2, 8, 1, 2, 1, 6, 7, 6, 7, 2, 1, 6, 7, 3, 0, 1, 2, 1, 4, 4, 1, 3, 8, 1, 3, 4, 2, 3, 1, 7, 7, 0, 8, 1, 4, 7, 9, 2, 6, 5, 5, 7, 7, 5, 3, 6, 2, 8, 8, 4, 5, 4, 0, 3, 6, 6, 9, 4, 2, 7

Offset: 2

Author

Paolo Xausa, Oct 25 2024

Keywords

• nonn
• cons
• easy

Examples

			32.4346643636148951726751573735281216767216730121...
		

Links

• Eric Weisstein's World of Mathematics, Truncated Cube.
• Wikipedia, Truncated cube.

Crossrefs

Cf. A377299 (volume), A294968 (circumradius), A010503 (midradius - 1), A377296 (Dehn invariant, negated).

Cf. A002193, A002194, A010469, A010524.

Programs

Mathematica

First[RealDigits[2*(6 + Sqrt[72] + Sqrt[3]), 10, 100]] (* or *)
First[RealDigits[PolyhedronData["TruncatedCube", "SurfaceArea"], 10, 100]]

Formula

Equals 2*(6 + 6*sqrt(2) + sqrt(3)) = 2*(6 + 2*A002193 + A002194) = 12 + 2*A010524 + A010469.