OFFSET
0,3
LINKS
Index entries for linear recurrences with constant coefficients, signature (7,-12,1,1).
FORMULA
G.f.: -x*(3*x^2-2*x+1)/((x^2-3*x+1)*(x^2+4*x-1)). - Alois P. Heinz, Apr 21 2016
E.g.f.: (exp(-(sqrt(5)-2)*x)*(exp(2*sqrt(5)*x) + exp((sqrt(5)-1)*x/2) - exp((3*sqrt(5)-1)x/2) - 1))/sqrt(5). - Ilya Gutkovskiy, Apr 22 2016
MAPLE
a:= n-> (<<0|1|0|0>, <0|0|1|0>, <0|0|0|1>,
<1|1|-12|7>>^n. <<0, 1, 5, 26>>)[1, 1]:
seq(a(n), n=0..30); # Alois P. Heinz, Apr 21 2016
MATHEMATICA
Table[Fibonacci[3n] - Fibonacci[2n], {n, 0, 25}] (* Robert Price, Apr 21 2016 *)
PROG
(PARI) a(n) = fibonacci(3*n) - fibonacci(2*n); \\ Michel Marcus, Apr 21 2016
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Peter M. Chema, Apr 21 2016
STATUS
approved