A087953 a(n) = floor((Fibonacci(2*n+1)+1)/2).
1, 1, 3, 7, 17, 45, 117, 305, 799, 2091, 5473, 14329, 37513, 98209, 257115, 673135, 1762289, 4613733, 12078909, 31622993, 82790071, 216747219, 567451585, 1485607537, 3889371025, 10182505537, 26658145587, 69791931223, 182717648081, 478361013021, 1252365390981
Offset: 0
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..1000
- Index entries for linear recurrences with constant coefficients, signature (3,-1,1,-3,1).
Programs
-
Mathematica
Table[Floor[(Fibonacci[2n+1]+1)/2],{n,0,30}] (* Harvey P. Dale, May 31 2021 *)
Formula
G.f.: (-1-x^4+2*x^3-x^2+2*x)/((x-1)*(x^2+x+1)*(x^2-3*x+1)). [Maksym Voznyy (voznyy(AT)mail.ru), Jul 27 2009]