|
%I #20 Jan 03 2024 02:59:02
%S 25,1,11,1,50,1,11,1,50,1,11,1,50,1,11,1,50,1,11,1,50,1,11,1,50,1,11,
%T 1,50,1,11,1,50,1,11,1,50,1,11,1,50,1,11,1,50,1,11,1,50,1,11,1,50,1,
%U 11,1,50,1,11,1,50,1,11,1,50,1,11,1,50,1,11,1,50,1,11
%N Continued fraction for sqrt(672).
%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>.
%H <a href="/index/Rec#order_04">Index entries for linear recurrences with constant coefficients</a>, signature (0,0,0,1).
%F From _Amiram Eldar_, Jan 03 2024: (Start)
%F Multiplicative with a(2) = 11, a(2^e) = 50 for e >= 2, and a(p^e) = 1 for an odd prime p.
%F Dirichlet g.f.: zeta(s) * (1 + 5/2^(s-1) + 39/2^(2*s)). (End)
%p with(numtheory): Digits := 300: convert(evalf(sqrt(672)),confrac);
%t ContinuedFraction[Sqrt[672],100] (* or *) PadRight[{25},100,{50,1,11,1}] (* _Harvey P. Dale_, Apr 19 2022 *)
%K nonn,cofr,easy,mult
%O 0,1
%A _N. J. A. Sloane_
|
