[go: up one dir, main page]

login
A015529
Expansion of x/(1 - 3*x - 11*x^2).
11
0, 1, 3, 20, 93, 499, 2520, 13049, 66867, 344140, 1767957, 9089411, 46715760, 240130801, 1234265763, 6344236100, 32609631693, 167615492179, 861552425160, 4428427689449, 22762359745107, 116999783819260, 601385308653957, 3091153547973731
OFFSET
0,3
FORMULA
a(n) = 3*a(n-1) + 11*a(n-2).
a(n) = -22^n*(A^n - B^n)/sqrt(53) where A = -1/(3+sqrt(53)) and B = 1/(sqrt(53)-3). - R. J. Mathar, Apr 29 2008
MATHEMATICA
Join[{a=0, b=1}, Table[c=3*b+11*a; a=b; b=c, {n, 100}]] (* Vladimir Joseph Stephan Orlovsky, Jan 16 2011 *)
LinearRecurrence[{3, 11}, {0, 1}, 30] (* Vincenzo Librandi, Nov 12 2012 *)
CoefficientList[Series[x/(1-3x-11x^2), {x, 0, 30}], x] (* Harvey P. Dale, Aug 19 2024 *)
PROG
(Sage) [lucas_number1(n, 3, -11) for n in range(0, 22)] # Zerinvary Lajos, Apr 22 2009
(Magma) [n le 2 select n-1 else 3*Self(n-1) + 11*Self(n-2): n in [1..30] ]; // Vincenzo Librandi, Nov 12 2012
(PARI) x='x+O('x^30); concat([0], Vec(x/(1-3*x-11*x^2))) \\ G. C. Greubel, Jan 01 2018
CROSSREFS
Sequence in context: A227811 A363603 A092786 * A278319 A305203 A246150
KEYWORD
nonn,easy
STATUS
approved