|
%I
%S 15,3,2,1,2,1,2,3,30,3,2,1,2,1,2,3,30,3,2,1,2,1,2,3,30,3,2,1,2,1,2,3,
%T 30,3,2,1,2,1,2,3,30,3,2,1,2,1,2,3,30,3,2,1,2,1,2,3,30,3,2,1,2,1,2,3,
%U 30,3,2,1,2,1,2,3,30,3,2,1,2,1,2,3,30,3,2,1,2,1,2,3
%N Continued fraction for sqrt(234).
%H <a href="/index/Con#confC">Index entries for continued fractions for constants</a>
%H <a href="/index/Rec#order_08">Index entries for linear recurrences with constant coefficients</a>, signature (0, 0, 0, 0, 0, 0, 0, 1).
%F a(n)=(1/28)*{-89*(n mod 8)+2*[(n+1) mod 8]+2*[(n+2) mod 8]+9*[(n+3) mod 8]+2*[(n+4) mod 8]+9*[(n+5) mod 8]+9*[(n+6) mod 8]+100*[(n+7) mod 8]}-15*[C(2*n,n) mod 2], with n>=0 [From _Paolo P. Lava_, Apr 23 2009]
%p with(numtheory): Digits := 300: convert(evalf(sqrt(234)),confrac);
%t ContinuedFraction[Sqrt[234],100] (* _Harvey P. Dale_, Mar 30 2012 *)
%t PadRight[{15},120,{30,3,2,1,2,1,2,3}] (* _Harvey P. Dale_, Mar 04 2016 *)
%K nonn,cofr,easy
%O 0,1
%A _N. J. A. Sloane_.
|
