|
|
A022319
|
|
a(n) = a(n-1) + a(n-2) + 1 for n > 1, a(0)=1, a(1)=5.
|
|
6
|
|
|
1, 5, 7, 13, 21, 35, 57, 93, 151, 245, 397, 643, 1041, 1685, 2727, 4413, 7141, 11555, 18697, 30253, 48951, 79205, 128157, 207363, 335521, 542885, 878407, 1421293, 2299701, 3720995, 6020697, 9741693
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
G.f.: (1 + 3*x - 3*x^2) / ((1-x)*(1 - x - x^2)).
|
|
MAPLE
|
with(combinat): seq(fibonacci(n-2)+fibonacci(n+4)-1, n=0..29); # Zerinvary Lajos, Feb 01 2008
|
|
MATHEMATICA
|
LinearRecurrence[{2, 0, -1}, {1, 5, 7}, 40] (* Harvey P. Dale, Nov 19 2014 *)
|
|
PROG
|
(Haskell)
a022319 n = a022319_list !! (n-1)
a022319_list = 1 : 5 : zipWith (+)
(map (+ 1) a022319_list) (tail a022319_list)
(PARI) x='x+O('x^50); Vec((1 +3*x -3*x^2)/((1-x)*(1 -x -x^2))) \\ G. C. Greubel, Aug 25 2017
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,easy
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|