|
%I #21 Dec 27 2023 01:33:19
%S 25,10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,50,
%T 10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,
%U 50,10,50,10,50,10,50,10,50,10,50,10,50,10,50,10,50
%N Continued fraction for sqrt(630).
%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>
%H <a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (0, 1).
%F G.f.: 5*(5 + 2*x + 5*x^2)/(1 - x^2). - _Stefano Spezia_, Dec 22 2021
%F a(n) = 5 * A040024(n). - _Alois P. Heinz_, Dec 22 2021
%p with(numtheory): Digits := 300: convert(evalf(sqrt(630)),confrac);
%t Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[630],100]] (* or *) PadRight[{25},100,{50,10}] (* _Harvey P. Dale_, May 20 2018 *)
%Y Cf. A040024.
%K nonn,cofr,easy
%O 0,1
%A _N. J. A. Sloane_.
|
