|
%I #20 Sep 08 2022 08:45:45
%S 1,5,1,1,1,1,2,12,12,6,1,1,1,1,11,1,4,1,3,2,1,6,1,4,4,3,3,4,10,1,4,37,
%T 1,1,20,1,1,1,4,1,1,3,1,1,1,1,2,2,15,2,1,2,2,1,1,1,3,1,4,3,83,9,19,1,
%U 2,2,4,1,1,1,4,3,4,1,1,8,2,1,2,1,7,3,2,1,1,5,1,6,1,5,1,7,17,9,6,3,1,1,1,1,2
%N Continued fraction for (3*Pi)/8.
%H Harry J. Smith, <a href="/A161685/b161685.txt">Table of n, a(n) for n = 0..20000</a>
%e 1.178097245096172464423491268... = 1 + 1/(5 + 1/(1 + 1/(1 + 1/(1 + ...))))
%p convert(3*Pi/8, confrac, 105); # _G. C. Greubel_, Aug 11 2019
%t ContinuedFraction[(3*Pi)/8,120] (* _Harvey P. Dale_, Mar 13 2016 *)
%o (PARI) { allocatemem(932245000); default(realprecision, 21000); x=contfrac(3*Pi/8); for (n=0, 20000, write("b161685.txt", n, " ", x[n+1])); }
%o (Magma) SetDefaultRealField(RealField(105)); R:= RealField(); ContinuedFraction(3*Pi(R)/8); // _G. C. Greubel_, Aug 11 2019
%o (Sage) continued_fraction_list(3*pi/8, nterms=105) # _G. C. Greubel_, Aug 11 2019
%Y Cf. A195909, A195913, A195697. - _Mohammad K. Azarian_, Oct 11 2011
%Y Cf. A093828 (decimal expansion).
%K nonn,cofr
%O 0,2
%A _Harry J. Smith_, Jun 18 2009
|
