OFFSET
0,4
LINKS
G. C. Greubel, Table of n, a(n) for n = 0..1000
Index entries for linear recurrences with constant coefficients, signature (5,-2,-5,-1).
FORMULA
From L. Edson Jeffery, Oct 06 2012: (Start)
G.f.: x^2/(1-5x+2x^2+5x^3+x^4). [Corrected by Georg Fischer, May 18 2019]
a(n) = 5*a(n-1) - 2*a(n-2) - 5*a(n-3) - a(n-4), n>=4, a(0)=a(1)=0, a(2)=1, a(3)=5. (End)
a(n) = Sum_{k=0..n} F(3*k)*F(n-k)/2, for F(n) = A000045(n), the Fibonacci sequence. - Greg Dresden, Aug 27 2021
MATHEMATICA
LinearRecurrence[{5, -2, -5, -1}, {0, 0, 1, 5}, 50] (* or *) Table[( Fibonacci[3*n] - 2*Fibonacci[n])/6, {n, 0, 30}] (* G. C. Greubel, Dec 02 2017 *)
PROG
(PARI) for(n=0, 30, print1((fibonacci(3*n) - 2*fibonacci(n))/6, ", ")) \\ G. C. Greubel, Dec 02 2017
(Magma) [(Fibonacci(3*n) - 2*Fibonacci(n))/6: n in [0..30]]; // G. C. Greubel, Dec 02 2017
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
STATUS
approved