%I
%S 12,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,
%T 2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,24,2,
%U 24,2,24,2,24,2,24,2,24,2,24,2
%N Continued fraction for sqrt(156).
%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 a(n)=13+11*(-1)^n-12*[C(2*n,n) mod 2], with n>=0 [From _Paolo P. Lava_, Jun 10 2009]
%p Digits := 100: convert(evalf(sqrt(N)),confrac,90,'cvgts'):
%t ContinuedFraction[Sqrt[156],300] (* _Vladimir Joseph Stephan Orlovsky_, Mar 23 2011*)
%t PadRight[{12},120,{24,2}] (* _Harvey P. Dale_, Aug 26 2014 *)
%K nonn,cofr,easy
%O 0,1
%A _N. J. A. Sloane_.
|