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 A065477 #18 Nov 28 2024 19:08:21
%S A065477 7,4,3,9,7,1,1,9,3,3,5,0,3,7,4,7,4,4,6,8,6,5,5,9,6,0,7,5,8,5,6,5,0,0,
%T A065477 0,0,9,8,6,0,0,8,6,9,2,8,6,1,3,2,7,8,7,3,3,1,9,5,1,2,3,8,9,1,7,2,2,4,
%U A065477 6,7,4,3,0,5,6,9,7,9,5,3,4,0,6,2,5,2,3,6,2,1,8,1,8,7,1,7,2,5
%N A065477 Decimal expansion of constant 5 * Pi^2 * A065476 / 48.
%D A065477 Steven R. Finch, Mathematical Constants, Encyclopedia of Mathematics and its Applications, vol. 94, Cambridge University Press, 2003, Section 2.4, p. 106.
%H A065477 G. Niklasch, <a href="/A001692/a001692.html">Some number theoretical constants: 1000-digit values</a>. [Cached copy]
%e A065477 0.743971193350374744686559607585650...
%t A065477 $MaxExtraPrecision = 500; digits = 98; terms = 500; P[n_] := PrimeZetaP[n] - 1/2^n; LR = Join[{0, 0}, LinearRecurrence[{0, 1, 2}, {-2, -6, -2}, terms + 10]]; r[n_Integer] := LR[[n]]; (5 Pi^2/48)*Exp[NSum[r[n]*P[n - 1]/(n - 1), {n, 3, terms}, NSumTerms -> terms, WorkingPrecision -> digits + 10]] // RealDigits[#, 10, digits]& // First (* _Jean-François Alcover_, Apr 18 2016 *)
%o A065477 (PARI) (5 * Pi^2 / 48) * prodeulerrat(1 - (p+2)/p^3, 1, 3) \\ _Amiram Eldar_, Mar 16 2021
%Y A065477 Cf. A065476, A078088.
%K A065477 cons,nonn
%O A065477 0,1
%A A065477 _N. J. A. Sloane_, Nov 19 2001