cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A377604 Decimal expansion of the circumradius of a snub cube (snub cuboctahedron) with unit edge length.

This page as a plain text file.
%I A377604 #8 Nov 04 2024 09:16:19
%S A377604 1,3,4,3,7,1,3,3,7,3,7,4,4,6,0,1,7,0,1,2,7,1,5,2,8,7,5,3,9,7,5,0,5,8,
%T A377604 2,4,7,6,3,7,6,0,2,6,0,9,3,5,3,5,8,6,4,9,8,8,7,7,7,6,2,0,9,6,5,8,5,5,
%U A377604 7,0,6,9,0,8,9,3,4,8,7,9,4,5,6,9,7,3,3,1,6,8
%N A377604 Decimal expansion of the circumradius of a snub cube (snub cuboctahedron) with unit edge length.
%H A377604 Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/SnubCube.html">Snub Cube</a>.
%H A377604 Wikipedia, <a href="https://en.wikipedia.org/wiki/Snub_cube">Snub cube</a>.
%F A377604 Equals sqrt((3 - A058265)/(4*(2 - A058265))).
%e A377604 1.343713373744601701271528753975058247637602609...
%t A377604 First[RealDigits[Sqrt[(3 - #)/(8 - 4*#)], 10, 100]] & [Root[#^3 - #^2 - # - 1 &, 1]] (* or *)
%t A377604 First[RealDigits[PolyhedronData["SnubCube", "Circumradius"], 10, 100]]
%Y A377604 Cf. A377602 (surface area), A377603 (volume), A377605 (midradius).
%Y A377604 Cf. A058265.
%K A377604 nonn,cons,easy
%O A377604 1,2
%A A377604 _Paolo Xausa_, Nov 03 2024