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 A269893 #8 Feb 16 2025 08:33:30
%S A269893 5,3,5,6,5,6,6,5,6,0,1,5,6,9,9,8,6,1,1,4,4,8,6,0,2,0,0,6,9,5,3,2,2,8,
%T A269893 5,4,8,6,9,7,3,1,7,3,7,2,3,2,9,8,3,2,5,9,3,6,4,8,4,0,4,5,1,9,5,9,7,7,
%U A269893 6,3,5,9,2,7,1,1,3,2,2,0,3,1,7,7,8,7,6,4,6,6,6,7,6,5,1,9,2,4,2,1,2,2,7,5,7,8,4,0,0,9,9,9,0,4,2,6,6,4,4,9
%N A269893 Decimal expansion of the value of the maximum of the Airy function Ai.
%H A269893 Eric Weisstein's MathWorld, <a href="https://mathworld.wolfram.com/AiryFunctions.html">Airy Functions</a>
%e A269893 0.53565665601569986114486020069532285486973173723298325936484...
%t A269893 FindRoot[AiryAiPrime[x] == 0, {x, -1}, WorkingPrecision -> 104][[1, 2]] // AiryAi // RealDigits // First
%o A269893 (PARI) computeAtCurrentPrecision()=my(left=-2., right=-1., e=4.>>bitprecision(1.)); while(right-left>e, my(L=(2*left+right)/3, R=(left+2*right)/3); if(airy(L)[1] < airy(R)[1], left=L, right=R)); airy((left+right)/2)[1]; \\ _Charles R Greathouse IV_, Apr 26 2019
%Y A269893 Cf. A269892 (location of maximum).
%K A269893 nonn,cons
%O A269893 0,1
%A A269893 _Jean-François Alcover_, Mar 07 2016