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.
%I A385696 #10 Jul 13 2025 07:07:36 %S A385696 2,1,0,9,0,3,1,4,9,1,5,9,3,9,7,3,2,7,6,7,2,5,8,4,3,9,6,7,8,1,5,7,0,4, %T A385696 6,0,5,2,1,5,9,6,2,2,4,3,7,3,7,5,1,5,7,4,0,6,3,4,7,8,0,0,5,0,1,5,7,7, %U A385696 4,7,5,1,8,5,4,3,4,6,2,8,5,9,1,0,0,8,2,8,6,3 %N A385696 Decimal expansion of the surface area of an augmented dodecahedron with unit edge. %C A385696 The augmented dodecahedron is Johnson solid J_58. %H A385696 Paolo Xausa, <a href="/A385696/b385696.txt">Table of n, a(n) for n = 2..10000</a> %H A385696 Wikipedia, <a href="https://en.wikipedia.org/wiki/Augmented_dodecahedron">Augmented dodecahedron</a>. %F A385696 Equals (5*sqrt(3) + 11*sqrt(5*(5 + 2*sqrt(5))))/4 = (5*A002194 + 11*sqrt(5*(5 + A010476)))/4. %F A385696 Equals the largest root of 256*x^8 - 198400*x^6 + 41204000*x^4 - 1620087500*x^2 + 7460640625. %e A385696 21.090314915939732767258439678157046052159622437375... %t A385696 First[RealDigits[(5*Sqrt[3] + 11*Sqrt[25 + 10*Sqrt[5]])/4, 10, 100]] (* or *) %t A385696 First[RealDigits[PolyhedronData["J58", "SurfaceArea"], 10, 100]] %Y A385696 Cf. A385695 (volume). %Y A385696 Cf. A002194, A010476, A385803, A385805. %K A385696 nonn,cons,easy %O A385696 2,1 %A A385696 _Paolo Xausa_, Jul 08 2025