editing
approved
editing
approved
a(n)=(1/2)*[45+27(-1)^n]-18*[C(2*n,n) mod 2], with n>=0 [From Paolo P. Lava, Apr 27 2009]
approved
editing
editing
approved
Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[328], 100]] (* or *) PadRight[{18}, 120, 100, {36, 9}] (* Harvey P. Dale, Aug 24 2019 *)
approved
editing
editing
approved
Block[{$MaxExtraPrecision=1000}, ContinuedFraction[Sqrt[328], 100]] (* or *) PadRight[{18}, 120, {36, 9}] (* Harvey P. Dale, Aug 24 2019 *)
approved
editing
editing
approved
<a href="/index/Rec#order_02">Index entries for linear recurrences with constant coefficients</a>, signature (0, 1).
approved
editing
a(n)=(1/2)*[45+27(-1)^n]-18*[C(2*n,n) mod 2], with n>=0 [From _Paolo P. Lava (paoloplava(AT)gmail.com), _, Apr 27 2009]
_N. J. A. Sloane (njas(AT)research.att.com)_.