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 A379091 #5 Dec 15 2024 09:32:23
%S A379091 1,7,3,5,6,6,2,8,2,4,5,3,0,3,4,7,4,2,5,6,5,8,2,6,0,7,4,9,7,1,9,6,6,8,
%T A379091 5,3,0,2,5,4,6,5,2,8,4,7,2,9,0,3,9,2,7,5,4,6,0,9,9,3,4,0,7,3,6,8,1,5,
%U A379091 4,0,4,2,4,0,9,6,4,6,7,1,6,1,8,4,7,4,6,7,7,1,5,3,6,9,4,9,3,6,3,5
%N A379091 Decimal expansion of 1/A347901.
%D A379091 Steven R. Finch, Mathematical Constants, Encyclopedia of Mathematics and its Applications, vol. 94, Cambridge University Press, 2003, Section 5.19, p. 381.
%H A379091 A. M. Odlyzko and H. S. Wilf, <a href="http://www.jstor.org/stable/2322898">The editor's corner: n coins in a fountain</a>, Amer. Math. Monthly, 95 (1988), 840-843.
%e A379091 1.73566282453034742565826074971966853025465284729...
%t A379091 RealDigits[1/r/.FindRoot[Sum[(-1)^k*r^(k^2)/QPochhammer[r, r, k], {k, 0, 1000}] == 0, {r, 1/2}, WorkingPrecision -> 120],10,100][[1]] (* after _Vaclav Kotesovec_, Sep 18 2021 in A347901 *)
%Y A379091 Cf. A005169, A347901.
%K A379091 nonn,cons
%O A379091 1,2
%A A379091 _Stefano Spezia_, Dec 15 2024