A386696 Decimal expansion of the volume of a snub square antiprism with unit edges.

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

Offset: 1

Author

Paolo Xausa, Jul 31 2025

Keywords

• nonn
• cons
• easy

Comments

The snub square antiprism is Johnson solid J_85.

Examples

			3.601222009733930312488413957294053408882603461...
		

Links

• Paolo Xausa, Table of n, a(n) for n = 1..10000
• Wikipedia, Snub square antiprism.

Crossrefs

Cf. A385259 (surface area + 8).

Cf. A386695.

Programs

Mathematica

First[RealDigits[Root[531441*#^12 - 85726026*#^8 - 48347280*#^6 + 11588832*#^4 + 4759488*#^2 - 892448 &, 6], 10, 100]] (* or *)
First[RealDigits[PolyhedronData["J85", "Volume"], 10, 100]]

Formula

Equals the largest real root of 531441*x^12 - 85726026*x^8 - 48347280*x^6 + 11588832*x^4 + 4759488*x^2 - 892448.