|
%I #23 Aug 09 2022 04:18:10
%S 2,3,3,8,1,0,7,4,1,0,4,5,9,7,6,7,0,3,8,4,8,9,1,9,7,2,5,2,4,4,6,7,3,5,
%T 4,4,0,6,3,8,5,4,0,1,4,5,6,7,2,3,8,7,8,5,2,4,8,3,8,5,4,4,3,7,2,1,3,6,
%U 6,8,0,0,2,7,0,0,2,8,3,6,4,7,7,8,2,1,6,4,0,4,1,7,3,1,3,2,9,3,2,0,2,8
%N First (least negative) real zero of the Airy Ai function (negated).
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/AiryFunctions.html">Airy Functions</a>.
%e -2.33810741045976703848919725244673544063854014567238...
%t RealDigits[AiryAiZero[1], 10, 100][[1]] (* _Amiram Eldar_, Jun 27 2021 *)
%o (PARI) Ain(x)=sqrt((-x)/9)*(besselj(1/3,2/3*(-x)^(3/2)) + besselj(-1/3,2/3*(-x)^(3/2))) \\ Airy function Ai(x) for x < 0
%o -solve(x=-2.5,-2.2,Ain(x)) \\ _Thomas König_, Jan 29 2017
%o (PARI) -solve(x=-2.4,-2.3, airy(x)[1]) \\ _Charles R Greathouse IV_, Apr 27 2019
%o (PARI) solve(s=1,2, t=2/3*s^3; (besselj(1/3, t) + besselj(-1/3, t))*s)^2 \\ _Charles R Greathouse IV_, Aug 09 2022
%Y Cf. A096715.
%K nonn,cons
%O 1,1
%A _Eric W. Weisstein_, Jul 04 2004
|
