OFFSET
5,2
COMMENTS
Partial sums of A071679. - R. J. Mathar, Oct 12 2010
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 5..287
Index entries for linear recurrences with constant coefficients, signature (2,0,-1).
FORMULA
From R. J. Mathar, Oct 12 2010: (Start)
a(n) = 2*a(n-1) - a(n-3).
G.f.: x^5*(1+x)^2/((x-1)*(x^2+x-1)). (End)
MATHEMATICA
Fibonacci[Range[5, 40]]-4 (* or *) LinearRecurrence[{2, 0, -1}, {1, 4, 9}, 40] (* Harvey P. Dale, Jan 17 2022 *)
PROG
(Magma) [ Fibonacci(n) - 4: n in [5..50] ]; // Vincenzo Librandi, Apr 24 2011
(Haskell)
a157728 = subtract 4 . a000045 -- Reinhard Zumkeller, Oct 31 2013
(PARI) a(n)=fibonacci(n) - 4 \\ Charles R Greathouse IV, Jun 11 2015
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Jun 26 2010
STATUS
approved