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 A374814 #4 Jul 22 2024 15:28:36 %S A374814 7,4,0,5,3,6,1,8,4,8,8,6,3,9,2,3,1,4,1,2,6,0,2,1,7,7,2,4,4,5,7,3,5,0, %T A374814 5,8,8,0,3,5,5,2,0,4,1,8,7,1,1,5,5,5,8,3,0,5,3,9,6,8,5,5,7,4,4,4,0,1, %U A374814 9,8,7,3,7,7,6,6,6,2,9,6,8,2,6,1,6,7 %N A374814 Decimal expansion of Sum_{k>=0} cos(3k*Pi/5)/2^k. %F A374814 Equals (23 - 3*sqrt(5))/22. %F A374814 Equals Sum_{k>=0} cos(7 k*Pi/5)/2^k. %F A374814 Minimal polynomial: 11 - 23 x + 11 x^2. %e A374814 0.74053618488639231412602177244573... %t A374814 {b, m, h} = {2, 5, 3}; s = Sum[Cos[ h k Pi/m]/b^k, {k, 0, Infinity}] %t A374814 d = N[s, 100] %t A374814 First[RealDigits[d], 100] %Y A374814 Cf. A373021 (includes guide to related sequences). %K A374814 nonn,cons %O A374814 0,1 %A A374814 _Clark Kimberling_, Jul 20 2024