|
|
A022320
|
|
a(n) = a(n-1) + a(n-2) + 1, with a(0) = 1 and a(1) = 6.
|
|
1
|
|
|
1, 6, 8, 15, 24, 40, 65, 106, 172, 279, 452, 732, 1185, 1918, 3104, 5023, 8128, 13152, 21281, 34434, 55716, 90151, 145868, 236020, 381889, 617910, 999800, 1617711, 2617512, 4235224, 6852737, 11087962
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1 +4*x -4*x^2)/( (1-x)*(1-x-x^2) ).
|
|
MATHEMATICA
|
LinearRecurrence[{2, 0, -1}, {1, 6, 8}, 50] (* G. C. Greubel, Aug 25 2017 *)
nxt[{a_, b_}]:={b, a+b+1}; NestList[nxt, {1, 6}, 40][[;; , 1]] (* Harvey P. Dale, Mar 29 2024 *)
|
|
PROG
|
(PARI) x='x+O('x^50); Vec((1 +4*x -4*x^2)/((1-x)*(1-x-x^2))) \\ G. C. Greubel, Aug 25 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|