OFFSET
0,3
COMMENTS
Even bisection of the tribonacci sequence A000213. - Oboifeng Dira, Aug 03 2016
LINKS
FORMULA
G.f.: (1-x)^2/(1-3*x-x^2-x^3).
a(n) = Sum_{k=0..floor(n/2)} binomial(n+k, 3*k)*4^k.
a(n)/a(n-1) tends to 3.38297576..., the square of the tribonacci constant A058265. - Gary W. Adamson, Feb 28 2006
MATHEMATICA
LinearRecurrence[{3, 1, 1}, {1, 1, 5}, 30] (* Harvey P. Dale, Nov 29 2011 *)
CoefficientList[Series[(1 - x)^2/(1 - 3 x - x^2 - x^3), {x, 0, 24}], x] (* Michael De Vlieger, Aug 03 2016 *)
PROG
(Sage)
from sage.combinat.sloane_functions import recur_gen3
it = recur_gen3(1, 1, 1, 3, 1, 1)
[next(it) for i in range(32)] # Zerinvary Lajos, Jun 24 2008
(PARI) a(n)=([0, 1, 0; 0, 0, 1; 1, 1, 3]^n*[1; 1; 5])[1, 1] \\ Charles R Greathouse IV, Aug 03 2016
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Paul Barry, Aug 30 2004
STATUS
approved