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 A366018 #3 Sep 26 2023 07:41:51
%S A366018 4,8,2,4,2,0,4,3,9,5,8,7,3,1,9,7,6,4,6,5,9,3,6,4,3,9,1,2,6,6,8,4,9,4,
%T A366018 1,8,5,0,7,6,6,5,6,4,5,9,2,6,5,4,2,9,7,0,5,1,9,1,0,9,1,2,2,0,4,3,4,1,
%U A366018 3,7,3,9,5,8,5,8,6,9,4,1,9,5,1,6,2,8,2,6,4,5,6,5,6,1,8,0,6,5,8,4,9,1,8,9,1,8
%N A366018 Decimal expansion of a constant related to the asymptotics of A181315.
%F A366018 Equals limit_{n->infinity} A181315(n) * n^(3/2) / A270914^n.
%e A366018 0.482420439587319764659364391266849418507665645926542970519109122...
%t A366018 RealDigits[Sqrt[s/(Pi*Derivative[0, 2][QPochhammer][-1, r*s])]/r /. FindRoot[{2*s == QPochhammer[-1, r*s], r*Derivative[0, 1][QPochhammer][-1, r*s] == 2}, {r, 1/2}, {s, 1/2}, WorkingPrecision -> 120], 10, 105][[1]]
%Y A366018 Cf. A181315, A270914.
%K A366018 nonn,cons
%O A366018 0,1
%A A366018 _Vaclav Kotesovec_, Sep 26 2023