%I #4 Nov 01 2024 23:48:28
%S 4,1,7,9,8,9,8,9,8,7,3,2,2,3,3,3,0,6,8,3,2,2,3,6,4,2,1,3,8,9,3,5,7,7,
%T 3,0,9,9,9,7,5,4,0,6,2,5,5,2,7,7,2,7,3,0,2,4,4,7,3,5,1,6,3,3,1,8,7,0,
%U 2,5,4,6,9,8,4,6,9,4,9,8,5,4,3,9,0,5,4,2,5,4
%N Decimal expansion of the volume of a truncated cuboctahedron (great rhombicuboctahedron) with unit edge length.
%H Eric Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/GreatRhombicuboctahedron.html">Great Rhombicuboctahedron</a>.
%H Wikipedia, <a href="https://en.wikipedia.org/wiki/Truncated_cuboctahedron">Truncated cuboctahedron</a>.
%F Equals 22 + 14*sqrt(2) = 22 + 14*A002193.
%e 41.798989873223330683223642138935773099975406255...
%t First[RealDigits[22 + 14*Sqrt[2], 10, 100]] (* or *)
%t First[RealDigits[PolyhedronData["TruncatedCuboctahedron", "Volume"], 10, 100]]
%Y Cf. A377343 (surface area), A377345 (circumradius), A377346 (midradius).
%Y Cf. A020775 (analogous for a cuboctahedron, with offset 1).
%Y Cf. A002193.
%K nonn,cons,easy
%O 2,1
%A _Paolo Xausa_, Oct 26 2024