|
%I #23 Aug 04 2024 11:41:20
%S 4,2,3,1,7,7,1,3,1,1,1,1,4,10,8,1,2,3,3,2,5,8,6,14,1,9,1,1,1,2,6,2,2,
%T 4,3,2,2,6,1,12,1,35,32,1,3,5,15,1,2,1,6,1,2,1,1,2,16,6,1,7,1,2,2,1,2,
%U 1,1,27,3,6,4,26,2,1,31,2,1,1,12,1,1,2,2,1,24,5,2,591,6,33,1,8,1,2,6,2
%N Continued fraction for Pi * sqrt(2).
%H Harry J. Smith, <a href="/A063447/b063447.txt">Table of n, a(n) for n = 0..19999</a>
%e 4.442882938158366247015880990... = 4 + 1/(2 + 1/(3 + 1/(1 + 1/(7 + ...))))
%t ContinuedFraction[Pi*Sqrt[2],300] (* _Vladimir Joseph Stephan Orlovsky_, Mar 21 2011*)
%o (PARI) contfrac(Pi*sqrt(2))
%o (PARI) allocatemem(932245000); default(realprecision, 21000); x=contfrac(Pi*sqrt(2)); for (n=1, 20000, write("b063447.txt", n-1, " ", x[n])) \\ _Harry J. Smith_, Aug 21 2009
%o (Magma) SetDefaultRealField(RealField(150)); R:= RealField(); ContinuedFraction(Pi(R)*Sqrt(2)); // _G. C. Greubel_, Aug 16 2018
%Y Cf. A063448 (decimal expansion).
%K cofr,easy,nonn,changed
%O 0,1
%A _Jason Earls_, Jul 24 2001
%E Offset changed by _Andrew Howroyd_, Aug 04 2024
|
