|
|
A015570
|
|
Expansion of x/(1 - 7*x - 11*x^2).
|
|
1
|
|
|
0, 1, 7, 60, 497, 4139, 34440, 286609, 2385103, 19848420, 165175073, 1374558131, 11438832720, 95191968481, 792170939287, 6592308228300, 54860037930257, 456535656023099, 3799210009394520, 31616362282015729, 263105846077449823, 2189520907644321780, 18220810660362200513
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
LINKS
|
|
|
FORMULA
|
a(n) = 7*a(n-1) + 11*a(n-2).
|
|
MATHEMATICA
|
a[n_]:=(MatrixPower[{{1, 3}, {1, -8}}, n].{{1}, {1}})[[2, 1]]; Table[Abs[a[n]], {n, -1, 40}] (* Vladimir Joseph Stephan Orlovsky, Feb 19 2010 *)
|
|
PROG
|
(Sage) [lucas_number1(n, 7, -11) for n in range(0, 20)] # Zerinvary Lajos, Apr 24 2009
(Magma) [n le 2 select n-1 else 7*Self(n-1) + 11*Self(n-2): n in [1..30]]; // Vincenzo Librandi, Nov 14 2012
(PARI) x='x+O('x^30); concat([0], Vec(x/(1-7*x-11*x^2))) \\ G. C. Greubel, Jan 06 2018
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|