|
%I #10 Sep 08 2022 08:45:44
%S 4,3,9,0,4,4,9,6,0,5,8,7,4,3,1,4,4,2,7,2,6,8,5,0,3,8,8,1,8,3,1,0,0,4,
%T 8,5,8,8,4,6,9,3,8,6,1,8,7,3,9,9,1,2,8,2,0,4,0,5,6,2,7,3,4,5,0,0,5,8,
%U 2,9,9,1,1,1,0,6,5,0,0,4,0,2,4,7,1,6,1,1,4,8,1,4,1,9,2,4,7,1,4,3,8,1,3,0,8
%N Decimal expansion of (91443+58282*sqrt(2))/199^2.
%C lim_{n -> infinity} b(n)/b(n-1) = (91443+58282*sqrt(2))/199^2 for n mod 3 = 0, b = A129993.
%C lim_{n -> infinity} b(n)/b(n-1) = (91443+58282*sqrt(2))/199^2 for n mod 3 = 1, b = A159548.
%H G. C. Greubel, <a href="/A159550/b159550.txt">Table of n, a(n) for n = 1..10000</a>
%F (91443+58282*sqrt(2))/199^2 = (362+161*sqrt(2))/(362-161*sqrt(2))
%F = (3+2*sqrt(2))*(20-sqrt(2))^2/(20+sqrt(2))^2.
%e (91443+58282*sqrt(2))/199^2 = 4.39044960587431442726...
%p with(MmaTranslator[Mma]): Digits:=100:
%p RealDigits(evalf((91443+58282*sqrt(2))/199^2))[1]; # _Muniru A Asiru_, Mar 31 2018
%t RealDigits[(91443+58282Sqrt[2])/199^2,10,120][[1]] (* _Harvey P. Dale_, Sep 23 2012 *)
%o (PARI) (91443 + 58282*sqrt(2))/199^2 \\ _G. C. Greubel_, Mar 30 2018
%o (Magma) (91443 + 58282*Sqrt(2))/199^2; // _G. C. Greubel_, Mar 30 2018
%Y Cf. A129993, A159548, A002193 (decimal expansion of sqrt(2)), A159549 (decimal expansion of (201+20*sqrt(2))/199).
%K cons,nonn
%O 1,1
%A _Klaus Brockhaus_, Apr 14 2009
|
