login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A377605
Decimal expansion of the midradius of a snub cube (snub cuboctahedron) with unit edge length.
6
1, 2, 4, 7, 2, 2, 3, 1, 6, 7, 9, 9, 3, 6, 4, 3, 2, 5, 1, 7, 6, 9, 9, 1, 8, 9, 6, 0, 8, 9, 8, 0, 3, 0, 5, 8, 3, 4, 1, 6, 8, 7, 0, 1, 8, 0, 0, 1, 9, 5, 5, 8, 5, 2, 5, 7, 6, 3, 3, 8, 6, 0, 0, 6, 4, 6, 2, 7, 5, 1, 4, 7, 8, 3, 2, 6, 1, 5, 9, 1, 8, 8, 8, 4, 1, 5, 8, 6, 2, 1
OFFSET
1,2
LINKS
Eric Weisstein's World of Mathematics, Snub Cube.
Wikipedia, Snub cube.
FORMULA
Equals sqrt(1/(4*(2 - A058265))).
EXAMPLE
1.2472231679936432517699189608980305834168701800...
MATHEMATICA
First[RealDigits[Sqrt[1/(8 - 4*#)], 10, 100]] & [Root[#^3 - #^2 - # - 1 &, 1]] (* or *)
First[RealDigits[PolyhedronData["SnubCube", "Midradius"], 10, 100]]
CROSSREFS
Cf. A377602 (surface area), A377603 (volume), A377604 (circumradius).
Cf. A058265.
Sequence in context: A246183 A377731 A134974 * A244262 A166531 A133292
KEYWORD
nonn,cons,easy
AUTHOR
Paolo Xausa, Nov 03 2024
STATUS
approved